Logo Море(!) аналитической информации!
IT-консалтинг Software Engineering Программирование СУБД Безопасность Internet Сети Операционные системы Hardware
Архив форумов ЦИТФорума
Море(!) вопросов - Море(!) ответов
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 
Как правильно задавать вопросы

Калькулятор

 
Перейти:  
Этот форум закрыт, вы не можете писать новые сообщения и редактировать старые.   Эта тема закрыта, вы не можете писать ответы и редактировать сообщения.    Список форумов Архив форумов ЦИТФорума -> Программирование
Предыдущая тема :: Следующая тема  
Автор Сообщение
hhh8486



Зарегистрирован: 10.10.2007
Сообщения: 15

СообщениеДобавлено: Сб Окт 27 2007 13:16    Заголовок сообщения: Калькулятор Ответить с цитатой

Я должен создать Калькулятор и вот что у меня есть

Smile

//---------------------------------------------------------------------------

#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;
}
//---------------------------------------------------------------------------

Это работает но нужно еще сложить(+), минус(-) или умножить(*) разделить (/) помоги чем сможешь, отправь код если ты знаешь пожалуйста !!! Wink Wink Wink
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
Показать сообщения:   
Этот форум закрыт, вы не можете писать новые сообщения и редактировать старые.   Эта тема закрыта, вы не можете писать ответы и редактировать сообщения.    Список форумов Архив форумов ЦИТФорума -> Программирование Часовой пояс: GMT + 3
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах


Powered by phpBB © 2001, 2002 phpBB Group
Русская поддержка phpBB

 

IT-консалтинг Software Engineering Программирование СУБД Безопасность Internet Сети Операционные системы Hardware

Информация для рекламодателей PR-акции, размещение рекламы — adv@citforum.ru,
тел. +7 495 6608306, ICQ 232284597
Пресс-релизы — pr@citforum.ru
Послать комментарий
Информация для авторов
This Web server launched on February 24, 1997
Copyright © 1997-2000 CIT, © 2001-2006 CIT Forum
Внимание! Любой из материалов, опубликованных на этом сервере, не может быть воспроизведен в какой бы то ни было форме и какими бы то ни было средствами без письменного разрешения владельцев авторских прав. Подробнее...