簡(jiǎn)單計(jì)算器可視化程序編程

1、簡(jiǎn)單計(jì)算器、基本功能描述二進(jìn)制、八進(jìn)制、十進(jìn)制及十六進(jìn)制數(shù)的加、減、乘、除、乘方、取模等簡(jiǎn)單計(jì)科學(xué)計(jì)算函數(shù)，包括（反）正弦、（反）余弦、（反）正切、（反）余切、開方、指數(shù)等函數(shù)運(yùn)行以角度、弧度兩種方式實(shí)現(xiàn)上述部分函數(shù)具備歷史計(jì)算的記憶功能對(duì)不正確的表達(dá)式能指出其錯(cuò)誤原因流程圖輸入數(shù)據(jù)子函數(shù)圖1輸入數(shù)據(jù)子函數(shù)流程圖三、設(shè)計(jì)步驟打開MicrosoftVisualC+6.0,在文件中點(diǎn)擊新建，在彈出框內(nèi)選擇MFCAppWizardexe工程，輸入工程名Calculter及其所在位置，點(diǎn)擊確定，如圖3所示。新建團(tuán)區(qū)文件工程工作區(qū)其它文檔ATLCOMApWiaardClusterRcsourcf?Typ

2、eWizardCustomAppWiz9rd蹄口加baseProjectDevSludioAdd-iiWizard國(guó)ExtendedStoredProcWizard,fjlSAPIExtensionWizardMakefile編MFCActiveXConlrolWizard囹MFCAppWizard(dll)MhCAppWiz3rdlexeijNcwDatabaseWizardT|UtilityProject3Win32Application1Win32CunaolcApplicationyWin32Dynamic-LinkLibrayWin32StaticLibrary工程名稱回：|Calc

3、ulator色置理|DiVCCalculator|行創(chuàng)建新的工作空間但）摩加到當(dāng)前工作空間回r從屬干Di：II3平臺(tái)舊:Win32圖3新建MFCAppWizardexe工程將彈出MFCAppWizard-step1對(duì)話框，選擇基本對(duì)話框，點(diǎn)擊完成，如圖4所示。圖4基本對(duì)話框這樣，MFCAppWizard就建立了一個(gè)基于對(duì)話窗口的程序框架，如圖5所示。圖5新建的對(duì)話框四、界面設(shè)計(jì)1、創(chuàng)建控件在圖5所示的ResoureView選項(xiàng)卡中打開Dialog資源組，雙擊IDD_CALCULATOR_DIALOG在右邊的窗口中顯示出待編輯的對(duì)話框。開始擺放控件，包括編輯框和按鈕的創(chuàng)建。按鈕的創(chuàng)建以“1為例進(jìn)

4、行介紹，其他按鈕的創(chuàng)建可參照此進(jìn)行操作。1）在圖5中Controls的編輯框”按鈕上單擊鼠標(biāo)左鍵，在對(duì)話框編輯窗口上合適的位置按下鼠標(biāo)左鍵并拖動(dòng)鼠標(biāo)畫出一個(gè)大小合適的編輯框。在編輯框上單擊鼠標(biāo)右鍵，在彈出的快捷萊單中選擇屬性選項(xiàng)，此時(shí)彈出Edit屬性對(duì)話框，如圖6所示，在該對(duì)話框中輸入ID屬性。圖6Edit屬性對(duì)話框2）在圖3中Controls的"Button按鈕上單擊鼠標(biāo)左鍵，在對(duì)話框上的合適的位置上按下鼠標(biāo)左鍵并拖動(dòng)鼠標(biāo)畫出一個(gè)大小合適的下壓式按鈕。在按鈕上單擊鼠標(biāo)右鍵，在彈出的快捷菜單中選擇屬性選項(xiàng)，此時(shí)也彈出PushButton屬性對(duì)話框，如圖7所示，在該對(duì)話框中輸入控件的I

5、D值和標(biāo)題屬性。圖7PushButton屬性按照上面的操作過(guò)程編輯其他按鈕和編輯框等對(duì)象的屬性。表1各按鈕和編輯框等對(duì)象的屬性對(duì)象ID標(biāo)題或說(shuō)明編輯框IDC_DC_EDIT_INPUT結(jié)果顯示按鈕IDC_BUTTON11按鈕IDC_BUTTON22按鈕IDC_BUTTON313按鈕IDC_BUTTON44按鈕IDC_BUTTON55按鈕IDC_BUTTON66按鈕IDC_BUTTON77按鈕IDC_BUTTON88按鈕IDC_BUTTON919按鈕IDC_BUTTON100按鈕IDC_BUTTON11.按鈕IDC_BUTTON121空格按鈕IDC_BUTTON23-按鈕IDC_BUTTON26

6、*按鈕IDC_BUTTON27/按鈕IDC_BUTTON38sqrt按鈕IDC_BUTTON30%按鈕IDC_BUTTON25A按鈕IDC_BUTTON31sin按鈕IDC_BUTTON32cos按鈕IDC_BUTTON33tan按鈕IDCBUTTON34cot按鈕IDCBUTTON40sin1按鈕IDCBUTTON41cos1按鈕IDCBUTTON35log按鈕IDCBUTTON36In按鈕IDC_BUTTON14a按鈕IDCBUTTON15b按鈕IDCBUTTON16c按鈕IDC_BUTTON17d按鈕IDC_BUTTON18e按鈕IDC_BUTTON19f按鈕IDC_BUTTON13退格

7、按鈕IDC_BUTTON37eA按鈕IDC_BUTTON22清空按鈕IDOK計(jì)算按鈕IDC_RADIO_DEGREE角度按鈕IDC_RADIO_RADIAN弧度按鈕IDC_STATIC計(jì)算結(jié)果按鈕IDC_BTN_HISTREXP歷史表達(dá)式按鈕IDCANCEL退出按鈕IDC_BTN_CONVERT進(jìn)制完成后界面如圖8所小圖8計(jì)算器界面五、計(jì)算器源程序代碼/Calculation.cpp:implementationoftheCCalculationclass./#include"stdafx.h"#include"Calculator.h"#include

8、"Calculation/"#include"math.h"#ifdef_DEBUG#undefTHIS_FILEstaticcharTHIS_FILE=_FILE_;#definenewDEBUG_NEW#endif# defineFUNCNUM15/函數(shù)個(gè)數(shù)# defineCONSTNUM11/常數(shù)個(gè)數(shù)# definePI3.14159/Construction/Destruction/CCalculation:CCalculation()初始化函數(shù)和常數(shù)m_bDegree=0;m_nOutputFlag=0;opt0="eA"o

9、pt1="ch"opt2="sqr"opt3="sh"opt4="log"opt5="cos"opt6="sin"opt7="tan"opt8="ln"opt9="abs"opt10="at"opt11="as"opt12="ac"opt13="th"opt14="cot"opt20=w；opt21='/

10、9;opt22='*'opt23='%'opt24='+'opt25='-'m_strConName1="GG"m_strConName2="EF"m_strConName3="VM"m_strConName4="BC"m_strConName5="MG"m_strConName6="GR"m_strConName7="NA"m_strConValue1="9.80665"

11、m_strConValue2="(8.988*10A9)"m_strConValue3="0.02241383"m_strConValue4="(1.380662*10A(-23)”;m_strConValue5="8.3144"m_strConValue6="(6.6720*10A(-11)”;m_strConValue7="(6.022045*10A23)"CCalculation:CCalculation()boolCCalculation:IsDigital(CStringstr)whi

12、le(str.GetAt(0)='-')str.Delete(0);for(inti=0;i<FUNCNUM;i+)if(str.Find(opti)!=-1)return0;for(i=0;i<6;i+)if(str.Find(opt2i)!=-1)return0;return1;CStringCCalculation:NtoS(doubled)intdecimal,sign;char*buffer;buffer=_ecvt(d,16,&decimal,&sign);CStringstr=buffer;if(decimal>=0&&a

13、mp;decimal<=16)str.Insert(decimal,".");elseif(decimal>16)for(inti=str.GetLength();i<decimal;i+)str+="0"str+=".0"elsefor(inti=0;i<-decimal;i+)str.Insert(0,"0");str.Insert(0,".");if(sign=1)str.Insert(0,"-");returnstr;doubleCCalcul

14、ation:StoN(CStringstr)char*stopstring;doublex;x=strtod(str.GetBuffer(0),&stopstring);m_strTmp=stopstring;returnx;CStringCCalculation:TwoE(CStringstrExp)doublex2,y,x1=StoN(strExp);strExp=m_strTmp;charop=strExp.GetAt(0);strExp.Delete(0);x2=StoN(strExp);if(m_strTmp!="")return"ERROR_&

15、quot;+m_strTmp+"未知符號(hào)if(op='+')y=x1+x2;elseif(op='*')y=x1*x2;elseif(op='-')y=x1-x2;elseif(op=w)y=pow(x1,x2);elseif(op='/')y=x1/x2;elseif(op='%')y=fmod(x1,x2);elsereturn"ERROR_"+m_strTmp+"未知運(yùn)算符_"returnNtoS(y);CStringCCalculation:SingleE(

16、CStringop,doubledx)if(op="ln")returnNtoS(log(dx);elseif(op="log")returnNtoS(log10(dx);elseif(op="sqr")returnNtoS(sqrt(dx);elseif(op="eA")returnNtoS(exp(dx);elseif(op="abs")returnNtoS(fabs(dx);elseif(op="ac")returnNtoS(acos(dx);elseif(op=&qu

17、ot;as")returnNtoS(asin(dx);elseif(op="at")returnNtoS(atan(dx);if(m_bDegree)dx=dx*PI/180;if(op="tan")returnNtoS(tan(dx);elseif(op="sin")returnNtoS(sin(dx);elseif(op="cos")returnNtoS(cos(dx);elseif(op="cot")returnNtoS(1/tan(dx);elseif(op="sh&

18、quot;)returnNtoS(sinh(dx);else if(op="ch")returnNtoS(cosh(dx);elseif(op="th")returnNtoS(sinh(dx)/cosh(dx);elseif(op="exp")returnNtoS(pow(10,dx);return"ERROR"+op+"_未知函數(shù)_"intCCalculation:LocateLBra(CStringstrExp)intlen=strExp.GetLength();intpos=-1;for(

19、inti=0;i<len;i+)if(pos>=0&&strExp.GetAt(i)=')')break;if(strExp.GetAt(i)='(')pos=i;returnpos;voidCCalculation:DelBracket(CString*strExp)intpos=LocateLBra(*strExp);inti,len=strExp->GetLength();if(pos=-1)*strExp="ERROR_無(wú)效表達(dá)式_"return;for(i=pos;i<len;i+)if(st

20、rExp->GetAt(i)=')')break;CStringstr;str=strExp->Mid(pos+1,i-pos-1);MultiE(&str);strExp->Delete(pos,i-pos+1);strExp->Insert(pos,str);voidCCalculation:MultiE(CString*strExp)if(strExp->IsEmpty()*strExp="ERROR_函數(shù)表達(dá)式為空_"if(IsDigital(*strExp)return;while(1)/*處理所有的一元運(yùn)算*

21、/for(inti=0;i<FUNCNUM;i+)intpos=strExp->Find(opti);if(pos!=-1)CStringstr=strExp->Right(strExp->GetLength()-pos-opti.GetLength();doubledx=StoN(str);if(m_strTmp=str)*strExp="ERROR"+str+"_無(wú)法識(shí)別的函數(shù)_"return;strExp->Delete(pos,strExp->GetLength()-pos);*strExp+=SingleE(

22、opti,dx)+m_strTmp;MinusMinus(strExp);if(pos>=1)charch=strExp->GetAt(pos-1);if(ch>=48&&ch<=57)*strExp="ERROR_缺少二元運(yùn)算符_"return;break;if(i=FUNCNUM)break;/按運(yùn)算符優(yōu)先級(jí)處理二元運(yùn)算intpos=-1;while(1)pos=strExp->Find('A');if(pos=-1)break;elseCalcu(strExp,pos);while(1)pos=strExp

23、->Find('/');if(pos=-1)break;elseCalcu(strExp,pos);while(1)pos=strExp->Find('*');if(pos=-1)break;elseCalcu(strExp,pos);while(1)pos=strExp->Find('%');if(pos=-1)break;elseCalcu(strExp,pos);pos=0;if(strExp->GetAt(0)='-'|strExp->GetAt(0)='+')strExp-&

24、gt;Insert(0,"0");while(1)inttmpos=strExp->Right(strExp->GetLength()-pos).Find('-');if(tmpos=-1)break;elsepos+=tmpos;if(pos=0&&strExp->GetAt(pos+1)='-'|pos>0)if(strExp->GetAt(pos+1)='+')strExp->Delete(pos+1);pos=0;continue;/*處理連減（如：1）的情況*/in

25、tnCount=0;while(1)if(+pos>0)if(strExp->GetAt(pos)!='-')break;elsenCount+;elsebreak;if(nCount>0)strExp->Delete(pos-nCount-1,nCount+1);if(nCount%2=0)strExp->Insert(pos-nCount-1,"-");elseif(pos-nCount-1>0)strExp->Insert(pos-nCount-1,"+");pos=0;continue;e

26、lsepos-;/*/if(pos>0&&strExp->GetAt(pos-1)='+')pos+;continue;Calcu(strExp,pos);elsepos+;pos=0;while(1)pos=strExp->Find('+');/inttmpos=strExp->Right(strExp->GetLength()-pos).Find('+');if(pos=-1)break;/elsepos+=tmpos;if(pos=0&&strExp->GetAt(pos+

27、1)='+'|pos>0)/*處理連加（如：+1）的情況*/intnCount=0;while(1)if(+pos>0)if(strExp->GetAt(pos)!='+')break;elsenCount+;elsebreak;if(nCount>0)strExp->Delete(pos-nCount-1,nCount+1);strExp->Insert(pos-nCount-1,"+");pos=0;continue;elsepos-;/*/Calcu(strExp,pos);elsepos+;void

28、CCalculation:Calcu(CString*strExp,intpos)charch;for(intj=pos-1;j>=0;j-)ch=strExp->GetAt(j);if(ch='+'|ch='-'|ch='*'|ch='/'|ch='%'11ch=w)if(j=0&&ch!='-')*strExp="ERROR_缺少參數(shù)_"return;if(j=0&&ch='-')j=-1;/防止把負(fù)號(hào)誤判為減號(hào)el

29、seif(j>0&&ch='-'&&!IsDigital(strExp->Mid(j-1,1)j-;break;for(intk=pos+1;k<strExp->GetLength();k+)ch=strExp->GetAt(k);if(ch='+'|ch='-'|ch='*'|ch='/'|ch='%'11ch=w)if(ch='-'&&k>pos+1)break;if(ch='-'

30、&&k>0&&IsDigital(strExp->Mid(k+1,1)k+;elsebreak;CStringstrExp2=strExp->Mid(j+1,k-j-1);*strExp=strExp->Left(j+1)+TwoE(strExp2)+strExp->Right(strExp->GetLength()-k);if(strExp->Find("#IN")!=-1)*strExp="ERROR_結(jié)果有溢出或值域越界_"return;if(!SynRes(strExp)*

31、strExp="ERROR_缺少運(yùn)算符_"return;MinusMinus(strExp);CStringCCalculation:MainPro(CStringstrExp)if(strExp.IsEmpty()return"表達(dá)式不能為空"Macro(&strExp);*/strExp.MakeLower();/表達(dá)式全部小寫/*給表達(dá)式加上保護(hù)括號(hào)strExp.Insert(0,"(");strExp+=")"/*/intpos=strExp.Find("");intn=BraC

32、heck(strExp);CStringstr;str.Format("%d",abs(n);if(n=1)strExp+=")"elseif(n=-1)strExp.Insert(0,"(");elseif(n>0)return"缺少"+str+"個(gè)右括號(hào)"elseif(n<0)return"缺少"+str+"個(gè)左括號(hào)"while(pos!=-1)/去掉表達(dá)式中的空格符strExp.Delete(pos);pos=strExp.Find(&q

33、uot;");Oct2Dec(&strExp);/將表達(dá)式中的八進(jìn)制數(shù)轉(zhuǎn)換成十進(jìn)制Hex2Dec(&strExp);/將表達(dá)式中的十六進(jìn)制數(shù)轉(zhuǎn)換成十進(jìn)制Bin2Dec(&strExp);/將表達(dá)式中的二進(jìn)制數(shù)轉(zhuǎn)換成十進(jìn)制while(!IsDigital(strExp)DelBracket(&strExp);if(!SynRes(&strExp)returnstrExp;if(!SynRes(&strExp)returnstrExp;elsereturnModiResult(strExp);voidCCalculation:Macro(C

34、String*strExp)intpos;for(inti=0;i<CONSTNUM;i+)pos=strExp->Find(m_strConNamei);while(pos!=-1)strExp->Delete(pos,m_strConNamei.GetLength();strExp->Insert(pos,m_strConValuei);if(pos>=1)charch=strExp->GetAt(pos-1);if(ch>=48&&ch<=57|ch=41)*strExp="缺少二元運(yùn)算符"return;

35、pos=strExp->Find(m_strConNamei);CStringCCalculation:ModiResult(CStringstrRes)if(strRes.Find("#IN")!=-1)return"結(jié)果有溢出或值域越界"/*去掉保護(hù)括號(hào)*/if(strRes.GetAt(0)='(')strRes.Delete(0);if(strRes.GetAt(strRes.GetLength()-1)=')')strRes.Delete(strRes.GetLength()-1);/*/intpos=st

36、rRes.Find(".");CStringstr=""if(pos!=-1)if(pos=0)strRes="0"+strRes;elseif(strRes.GetAt(0)='-'&&strRes.GetAt(1)='.')strRes.Insert(1,"0");if(pos>16)strRes.Delete(pos);strRes.Insert(1,".");str.Format("%d",pos-1);str=&

37、quot;E"+str;pos=strRes.Find(".");if(pos=0|pos=1&&strRes.GetAt(0)='0')for(inti=pos+1;i<strRes.GetLength();i+)if(strRes.GetAt(i)!='0')break;if(i>4)str.Format("E-%d",i-2);strRes.Delete(pos,i-1);strRes.Insert(1,".");strRes=strRes.Left(pos+

38、16)+str;/截取小數(shù)點(diǎn)后16位returnstrRes;boolCCalculation:SynRes(CString*strExp)intpos=strExp->Find("ERROR");if(pos!=-1)pos=strExp->ReverseFind('_');strExp->Delete(pos,strExp->GetLength()-pos);pos=strExp->ReverseFind('_');strExp->Delete(0,pos+1);return0;return1;void

39、CCalculation:MinusMinus(CString*strExp)intpos=strExp->Find("-");if(pos!=-1)strExp->Delete(pos,2);strExp->Insert(pos,"+");if(strExp->GetAt(0)='+')strExp->Delete(0);intCCalculation:BraCheck(CStringstr)intlb=0,rb=0,len=str.GetLength();for(inti=0;i<len;i+)if

40、(str.GetAt(i)='(')lb+;elseif(str.GetAt(i)=')')rb+;returnlb-rb;voidCCalculation:Oct2Dec(CString*strExp)intlen,i,index,pos=strExp->Find("xo");CStringstrTmp,strDF;charch;doubledx;while(pos!=-1)dx=0;strTmp=""strDF=""strExp->Delete(pos,2);for(i=pos-1;i&

41、gt;=0;i-)ch=strExp->GetAt(i);if(ch=56|ch=57|ch>=97&&ch<=102)*strExp="ERROR_八進(jìn)制數(shù)越界_"return;if(ch>=48&&ch<=55|ch=46)strTmp.Insert(0,strExp->Mid(i,1);strExp->Delete(i);elsebreak;if(i=pos-1)*strExp="ERROR_缺少二元運(yùn)算符_"return;index=i;pos=strTmp.Find(&q

42、uot;.");if(pos!=-1)strDF=strTmp.Right(strTmp.GetLength()-pos-1);strTmp.Delete(pos,strTmp.GetLength()-pos);strTmp.MakeReverse();len=strTmp.GetLength();for(i=0;i<len;i+)ch=strTmp.GetAt(i);dx+=(ch-48)*pow(8,i);len=strDF.GetLength();for(i=0;i<len;i+)ch=strDF.GetAt(i);dx+=(ch-48)*pow(8,-i-1);s

43、trTmp=NtoS(dx);strExp->Insert(index+1,strTmp);pos=strExp->Find("xo");voidCCalculation:Hex2Dec(CString*strExp)intlen,i,index,pos=strExp->Find("xh");CStringstrTmp,strDF;charch;doubledx;while(pos!=-1)dx=0;strTmp=""strDF=""strExp->Delete(pos,2);for(i=p

44、os-1;i>=0;i-)ch=strExp->GetAt(i);if(ch>=48&&ch<=57|ch>=97&&ch<=102|ch=46)strTmp.Insert(0,strExp->Mid(i,1);strExp->Delete(i);elsebreak;if(i=pos-1)*strExp="ERROR_缺少二元運(yùn)算符_"return;index=i;pos=0;for(i=0;i<strTmp.GetLength();i+)if(strTmp.GetAt(i)='.

45、')pos+;if(pos>1)*strExp="ERROR_缺少二元運(yùn)算符_"return;pos=strTmp.Find(".");if(pos!=-1)strDF=strTmp.Right(strTmp.GetLength()-pos-1);strTmp.Delete(pos,strTmp.GetLength()-pos);strTmp.MakeReverse();len=strTmp.GetLength();for(i=0;i<len;i+)ch=strTmp.GetAt(i);if(ch>=48&&ch

46、<=57)/該數(shù)在09之間dx+=(ch-48)*pow(16,i);elseif(ch>=97&&ch<=102)/該數(shù)在af之間dx+=(ch-87)*pow(16,i);len=strDF.GetLength();for(i=0;i<len;i+)ch=strDF.GetAt(i);if(ch>=48&&ch<=57)/該數(shù)在09之間dx+=(ch-48)*pow(16,-i-1);elseif(ch>=97&&ch<=102)/該數(shù)在af之間dx+=(ch-87)*pow(16,-i-1);

47、strTmp=NtoS(dx);strExp->Insert(index+1,strTmp);pos=strExp->Find("xh");voidCCalculation:Bin2Dec(CString*strExp)intlen,i,index,pos=strExp->Find("xb");CStringstrTmp,strDF;charch;doubledx;while(pos!=-1)dx=0;strTmp=""strDF=""strExp->Delete(pos,2);for(i=

48、pos-1;i>=0;i-)ch=strExp->GetAt(i);if(ch>=50&&ch<=57|ch>=97&&ch<=102)*strExp="ERROR_二進(jìn)制數(shù)越界_"return;if(ch='0'|ch='1'|ch=46)strTmp.Insert(0,strExp->Mid(i,1);strExp->Delete(i);elsebreak;if(i=pos-1)*strExp="ERROR_缺少二元運(yùn)算符_"return;

49、index=i;pos=strTmp.Find(".");if(pos!=-1)strDF=strTmp.Right(strTmp.GetLength()-pos-1);strTmp.Delete(pos,strTmp.GetLength()-pos);strTmp.MakeReverse();len=strTmp.GetLength();for(i=0;i<len;i+)ch=strTmp.GetAt(i);dx+=(ch-48)*pow(2,i);len=strDF.GetLength();for(i=0;i<len;i+)ch=strDF.GetAt(i)

50、;dx+=(ch-48)*pow(2,-i-1);strTmp=NtoS(dx);strExp->Insert(index+1,strTmp);pos=strExp->Find("xb");voidCCalculation:Dec2Hex(CString*strExp/*strExp須為數(shù)字*/)boolbMinus=0;if(strExp->GetAt(0)='-')bMinus=1;strExp->Delete(0);intpos=strExp->Find('.');CStringstr,strDec;int

51、nDecInt;doubledDec;if(pos!=-1)strDec=strExp->Left(pos);nDecInt=atoi(strDec.GetBuffer(0);strDec=strExp->Right(strExp->GetLength()-pos);elsenDecInt=atoi(strExp->GetBuffer(0);strExp->Empty();while(nDecInt!=0)intnTmp=nDecInt%16;if(nTmp=10)str="a"elseif(nTmp=11)str="b"e

52、lseif(nTmp=12)str="c"elseif(nTmp=13)str="d"elseif(nTmp=14)str="e"elseif(nTmp=15)str="f"elsestr.Format("%d",nTmp);nDecInt/=16;strExp->Insert(0,str);*strExp+="."if(pos!=-1)dDec=StoN(strDec);intnCount=0;while(dDec!=0)dDec*=16;intnTmp=dDec;if(nTmp=10)str="a"elseif(nTmp=11)str="b"elseif(nTmp=12)str="c"elseif(nTmp=13)str="d"elseif(nTmp=14)str="e"elseif(nTmp=15)str="f"elsestr.Format("%d",nTmp);*