hhh8486
Зарегистрирован: 10.10.2007 Сообщения: 15
|
Добавлено: Сб Окт 27 2007 13:16 Заголовок сообщения: Калькулятор |
|
|
Я должен создать Калькулятор и вот что у меня есть
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
float accum;
int op;
int f;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
f=0;
op=0;
StaticText1->Caption=0;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Btn0Click(TObject *Sender)
{
if (f!=0)
StaticText1->Caption=StaticText1->Caption+ "0";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Btn1Click(TObject *Sender)
{
if (f==0)
{
StaticText1->Caption= "1";
f=1;
}
else
StaticText1->Caption=StaticText1->Caption + "1";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Btn2Click(TObject *Sender)
{
if (f==0)
{
StaticText1->Caption= "2";
f=1;
}
else
StaticText1->Caption=StaticText1->Caption + "2";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Btn3Click(TObject *Sender)
{
if (f==0)
{
StaticText1->Caption= "3";
f=1;
}
else
StaticText1->Caption=StaticText1->Caption + "3";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Btn4Click(TObject *Sender)
{
if (f==0)
{
StaticText1->Caption= "4";
f=1;
}
else
StaticText1->Caption=StaticText1->Caption + "4";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Btn5Click(TObject *Sender)
{
if (f==0)
{
StaticText1->Caption= "5";
f=1;
}
else
StaticText1->Caption=StaticText1->Caption + "5";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Btn6Click(TObject *Sender)
{
if (f==0)
{
StaticText1->Caption= "6";
f=1;
}
else
StaticText1->Caption=StaticText1->Caption + "6";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Btn7Click(TObject *Sender)
{
if (f==0)
{
StaticText1->Caption= "7";
f=1;
}
else
StaticText1->Caption=StaticText1->Caption + "7";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Btn8Click(TObject *Sender)
{
if (f==0)
{
StaticText1->Caption= "8";
f=1;
}
else
StaticText1->Caption=StaticText1->Caption + "8";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Btn9Click(TObject *Sender)
{
if (f==0)
{
StaticText1->Caption= "9";
f=1;
}
else
StaticText1->Caption=StaticText1->Caption + "9";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BtnkClick(TObject *Sender)
{
if (f==0)
{
StaticText1->Caption= "0,";
f=1;
}
else
{
if (StaticText1->Caption.Pos(",")==0)
StaticText1->Caption=StaticText1->Caption+",";
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BtnCClick(TObject *Sender)
{
StaticText1->Caption= "0";
accum=0;
op=0;
f=0;
}
//---------------------------------------------------------------------------
Это работает но нужно еще сложить(+), минус(-) или умножить(*) разделить (/) помоги чем сможешь, отправь код если ты знаешь пожалуйста !!! |
|