计算器 -- 青春岁月-- 编程爱好者博客

#include <sgwindow.h> /*SGWINDOW 程序必须的头文件*/#include <math.h> #define ID_ABOUT 10231#define ID_ZERO 10000#define ID_ONE 10001#define ID_TWO 10002#define ID_THREE 10003#define ID_FOUR 10004#define ID_FIVE 10005#define ID_SIX 10006#define ID_SEVEN 10007#define ID_EIGHT 10008#define ID_NINE 10009 #define ID_DOT 10010#define ID_SIGN 10011 #define ID_ADD 20001#define ID_MINUS 20002#define ID_MUTIPLE 20003#define ID_DIVIDE 20004#define ID_EQUAL 20006 #define ID_SIN 20010#define ID_COS 20011#define ID_TAN 20012#define ID_LOG 20013#define ID_LN 20014#define ID_EXP 20015#define ID_POWER 20016#define ID_SQRT 20017#define ID_REV 20018#define ID_PERCENT 20019 #define ID_ONOFF 30001#define ID_CLEAR 30002 #define ID_RESULT 32000#define ID_STATU 31000#define ID_FRAME 31110 #define VERSIONSTRING "Calculate 1.0 For SGWINDOW 2.0 \n Copyright (C) 2005-8 SGPRO\n\n江西师范大学计算机02软件殷圣鸽"#define XINTERVAL 40#define YINTERVAL 30 void Dispatch_Message(WinMessage WinMsg); /*消息处理函数定义*/gennum(wndhnd);char *trim(char*);wndhnd window; /*主窗体句柄*/wndhnd about; /* '关于' 按扭句柄*/wndhnd digit[10],dot,sign;wndhnd normaloperate[4];wndhnd onoff,clear,equal;wndhnd result;wndhnd extraoperate[15];wndhnd statu;wndhnd fra;wndhnd tip; double operand1 = 0,operand2 = 0,res = 0;bool opdready = false, opdready2 = false,resready =false;bool enable = true;int operate =0; char *captions[] ={ " 0 "," 1 "," 2 "," 3 "," 4 "," 5 "," 6 "," 7 "," 8 "," 9 ", " . ","-/+", " + "," - "," * "," / "," = ", " ON "," CE ", "sin","cos","tan","log"," ln ","exp","pow","sqr","1/x"," % "}; void main(){ WinMessage msg; /*主消息*/ winfont wft; /*字体*/ int dcnt = 0; SGWINDOWinit(); /*加载SGWINDOW*/ changewincircletime(0); setfont(&wft,1,4,WIN12,0); /*设置字体*/ window = new_form(100,100,300,290,1,wft,6,"计算器 1.0 For SGWINDOW 2.0","exe.bmp",true,true,true,40); /*设置窗体属性*/ result = new_Textbox(Get_FormUserarealeft(FORM(window))+6, Get_FormUserareatop(FORM(window))+10, 280,18,15,wft,"0",50,false,true,true,true); fra = new_frame(Get_FormUserarealeft(FORM(window))+6, Get_FormUserareatop(FORM(window))+40, 220,190,wft,"",true); for ( dcnt = 0; dcnt < 12; dcnt++) { if ( dcnt < 10 ) { digit[dcnt] = new_Defaultbutton(Get_FormUserarealeft(FORM(window))+20+(dcnt%3)*XINTERVAL, Get_FormUserareatop(FORM(window))+50+(dcnt/3)*YINTERVAL, captions[dcnt]); } else if (dcnt == 10 ) { dot = new_Defaultbutton(Get_FormUserarealeft(FORM(window))+20+(dcnt%3)*XINTERVAL, Get_FormUserareatop(FORM(window))+50+(dcnt/3)*YINTERVAL, captions[dcnt]); } else if (dcnt == 11 ) { sign = new_Defaultbutton(Get_FormUserarealeft(FORM(window)) + 20+(dcnt%3)*XINTERVAL, Get_FormUserareatop(FORM(window))+50+(dcnt/3)*YINTERVAL, captions[dcnt]); } } for ( dcnt = 0; dcnt < 4; dcnt++ ) { normaloperate[dcnt] = new_Defaultbutton(Get_FormUserarealeft(FORM(window))+20+3*XINTERVAL, Get_FormUserareatop(FORM(window))+50+dcnt*YINTERVAL, captions[dcnt+12]); } for (dcnt = 0; dcnt < 10; dcnt++) { extraoperate[dcnt] = new_Defaultbutton(Get_FormUserarealeft(FORM(window))+ 20+(dcnt%5)*XINTERVAL, Get_FormUserareatop(FORM(window))+50+(4+dcnt/5)*YINTERVAL, captions[dcnt+19]); } statu = new_Defaultstatubar(Get_FormUserarealeft(FORM(window))+2, Get_FormUserareatop(FORM(window))+50+6*YINTERVAL+10,290,"就绪"); onoff = new_Defaultbutton(Get_FormUserarealeft(FORM(window))+20+4*XINTERVAL, Get_FormUserareatop(FORM(window))+50, captions[17]); clear = new_Defaultbutton(Get_FormUserarealeft(FORM(window))+20+4*XINTERVAL, Get_FormUserareatop(FORM(window))+50+YINTERVAL, captions[18]); equal = new_Defaultbutton(Get_FormUserarealeft(FORM(window))+20+4*XINTERVAL, Get_FormUserareatop(FORM(window))+50+2*YINTERVAL, captions[16]); about = new_Defaultbutton(340,325," 关于 "); Register_Windowhandletoform(window,about,SGWNDBUTTON,ID_ABOUT);/*在主窗体中注册 '关于' 按扭句柄 */ Register_Windowhandletoform(window,result,SGWNDTEXTBOX,ID_RESULT); Register_Windowhandletoform(window,fra,SGWNDFRAME,ID_FRAME); for ( dcnt = 0; dcnt < 10; dcnt++) { Register_Windowhandletoform(window,digit[dcnt],SGWNDBUTTON,ID_ZERO+dcnt); } for ( dcnt = 0; dcnt < 4; dcnt++) { Register_Windowhandletoform(window,normaloperate[dcnt],SGWNDBUTTON,ID_ADD+dcnt); } for (dcnt = 0; dcnt < 10; dcnt++) { Register_Windowhandletoform(window,extraoperate[dcnt], SGWNDBUTTON,ID_SIN+dcnt); } Register_Windowhandletoform(window,dot,SGWNDBUTTON,ID_DOT); Register_Windowhandletoform(window,sign,SGWNDBUTTON,ID_SIGN); Register_Windowhandletoform(window,onoff,SGWNDBUTTON,ID_ONOFF); Register_Windowhandletoform(window,clear,SGWNDBUTTON,ID_CLEAR); Register_Windowhandletoform(window,equal,SGWNDBUTTON,ID_EQUAL); Register_Windowhandletoform(window,statu,SGWNDSTATUBAR,ID_STATU); Change_ButtonSize(equal,Get_ButtonSizewidth(BUTTON(equal)), Get_ButtonSizeheight(BUTTON(equal)) +YINTERVAL); while (TestMessageSource(window))/*当消息源存在时,进入消息循环*/ { msg = WindowSend_Message(GetMessageSource(window));/*提取并发送消息*/ Dispatch_Message(msg); /*处理消息*/ }} void Dispatch_Message(WinMessage msg) /*消息处理函数*/{ int ObjectID = Get_MessagescrID(msg); /*获取发送消息的对象的ID号*/ int MessageType = Get_MessagescrType(msg); /*获取该消息的类型*/ switch (ObjectID) { case ID_FORMCLOSE: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"关闭程序 ALT+F4"); } break; case ID_MAINFORM:/*主窗体对象*/ if (MessageType == WE_EXIT)/*主窗体发送退出消息*/ { delete_form(&FORMPTR(window));/* 销毁主窗体*/ } else if (MessageType == WE_FORMLOAD)/*主窗体发送加载消息*/ { Show_Form(window);/*显示主窗体*/ } else if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"就绪"); } break; case ID_STATU: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"计算器状态与帮助信息"); } break; case ID_FRAME: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"就绪"); } break; case ID_RESULT: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"结果显示屏, 数字超长时将分页显示"); } break; case ID_ABOUT:/* '关于'按扭对象*/ if (MessageType == WE_CLICK) /*关于按扭发送鼠标单击消息*/ { Messagebox("Calculate For SGWINDOW",VERSIONSTRING, SGMSGBOX_OKONLY,SGMSGBOXICON_information);/*缺省形式的消息框,显示当前SGWINDOW的版本字符串*/ } else if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"关于本软件..."); } break; case ID_ZERO: case ID_ONE: case ID_TWO: case ID_THREE: case ID_FOUR: case ID_FIVE: case ID_SIX: case ID_SEVEN: case ID_EIGHT: case ID_NINE: case ID_DOT: case ID_SIGN: if (MessageType==WE_CLICK && enable) { if ((opdready == true && opdready2 == false) || resready == true) { if (ObjectID!=ID_SIGN) Change_TextboxText(result,""); } gennum(Get_WindowItemhandle(*GetMessageSource(window),ObjectID)); } break; case ID_ADD: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"加法运算"); goto NC; } case ID_MINUS: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"减法运算"); goto NC; } case ID_MUTIPLE: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"乘法运算"); goto NC; } case ID_DIVIDE: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"除法运算"); goto NC; } NC:if (MessageType == WE_CLICK && enable) { if ( opdready && opdready2) { calculate(); } if (resready) { operand1 = res; res = 0; resready = false; } operate = ObjectID -20000; opdready = true; } break; case ID_SIN: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"计算弧度正弦"); goto EC; } case ID_COS: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"计算弧度余弦"); goto EC; } case ID_TAN: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"计算弧度正切"); goto EC; } case ID_LOG: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"计算10为底的对数"); goto EC; } case ID_LN: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"计算e为底的对数"); goto EC; } case ID_POWER: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"求平方"); goto EC; } case ID_SQRT: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"求开方"); goto EC; } case ID_REV: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"求倒数"); goto EC; } case ID_EXP: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"求e的幂"); goto EC; } case ID_PERCENT: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"求百分点"); goto EC; } EC:if (MessageType== WE_CLICK &&enable) { singlecal(ObjectID); } break; case ID_EQUAL: if (MessageType == WE_CLICK &&enable) { calculate(); } break; case ID_CLEAR: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"清除显示屏"); } if (MessageType == WE_CLICK && enable) { operand1 = 0; res = 0; operand2 = 0; Change_TextboxText(result,"0"); opdready = false; } break; case ID_ONOFF: if (MessageType==WE_MOUSEMOVE) { Set_StatubarText(statu,"计算器开关"); } if (MessageType == WE_CLICK) { enable = !enable; enable? Change_TextboxText(result,"0"): Change_TextboxText(result,""); operand1 = operand2 = res = 0; opdready = false; } }} calculate(){ char temp[128]; if (resready) { return; } if (!opdready || !opdready2) { return; } switch ( operate) { case 1: res = operand1+operand2; break; case 2: res = operand1-operand2; break; case 3: res = operand1*operand2; break; case 4: if (operand2!=0) res= operand1/operand2; else { Set_StatubarText(statu,"除法错误:除数为0"); Messagebox("计算器","除法错误:除数为0",SGMSGBOX_OKONLY,SGMSGBOXICON_critical); } break; } sprintf(temp,"%lf",res); Change_TextboxText(result,temp); opdready = false; opdready2 = false; resready = true; operand2 = 0; operate = 0;} gennum(wndhnd handle){ char numstring[64]=""; double temp; if (handle != sign) { if (resready == true) { resready = false; } if ( !strcmp(Get_TextboxText(TEXTBOX(result)),"0")) { if (handle == digit[0]) return; else { if (handle!=dot) Change_TextboxText(result,""); } } strcpy(numstring,Get_ButtonCaption(BUTTON(handle))); strcpy(numstring, trimstring(numstring)); Appendtext_Textbox(result,numstring); sscanf(Get_TextboxText(TEXTBOX(result)),"%lf",opdready? &operand2:&operand1); if (opdready==true) { opdready2 = true; } } else { if (resready == false) { opdready? (operand2 = -1*operand2) : (operand1 = -1*operand1); sprintf(numstring,"%lf",opdready? operand2:operand1); Change_TextboxText(result,numstring); } }} char *trimstring(char *s){ char b[128]="" ; int i = 0; int j = 0; for( ;*(s+i); i++) { if (s[i] !=' ') { b[j++] = s[i]; } } return b;} singlecal(int ID){ double tmp; sscanf(Get_TextboxText(TEXTBOX(result)),"%lf",&tmp); switch(ID) { case ID_SIN: tmp = sin(tmp); break; case ID_COS: tmp = cos(tmp); break; case ID_TAN: tmp = tan(tmp); break; case ID_LOG: if (tmp>0) tmp = log10(tmp); else { Set_StatubarText(statu,"计算对数错误:底数非正数"); Messagebox("计算器","计算对数错误:底数非正数",SGMSGBOX_OKONLY,SGMSGBOXICON_critical); } break; case ID_LN: if (tmp>0) tmp = log(tmp); else{ Set_StatubarText(statu,"计算对数错误:底数非正数"); Messagebox("计算器","计算对数错误:底数非正数",SGMSGBOX_OKONLY,SGMSGBOXICON_critical); } break; case ID_POWER: tmp = pow(tmp,2); break; case ID_SQRT: if (tmp>=0) tmp = sqrt(tmp); else { Set_StatubarText(statu,"开方错误:被开方数为负数"); Messagebox("计算器","错误:被开方数为负数",SGMSGBOX_OKONLY,SGMSGBOXICON_critical); } break; case ID_REV: if (tmp!=0) tmp = 1/tmp; else { Set_StatubarText(statu,"除法错误:除数为0"); Messagebox("计算器","除法错误:除数为0",SGMSGBOX_OKONLY,SGMSGBOXICON_critical); } break; case ID_PERCENT: tmp = tmp*100; break; case ID_EXP: tmp =exp(tmp); break; } if (resready == true) { res = tmp; } else { if (opdready == false) { operand1= tmp; opdready = true; } else if (opdready2==true) { operand2 = tmp; } } Formats_Textbox(result,"%lf",tmp);}

博客介绍

正文

计算器2005-10-07 19:38:00

评论