Блог программистов



F.A.Q.Pblog

1й год Форума программистов 2006-2007

Помогите создать калькулятор!

Я начал создавать калькулятор. прописывал одну кнопку и мне выдает ошибку на строку. посмотрите:

b:=StrToFloat(Edit1.Text);
if d=1 then
begin
c:=a+b;
Edit1.Text:=FloatToStr(c);
end
else
if d=2 then
begin
c:=a-b;
Edit1.Text:=FloatToStr(c);
end
else
if d=3 then
c:=a*b;
Edit1.Text:=FloatToStr(c);
end
else //ошибка здесь.
if (d=4) and (b0) then
begin
c:=a/b;
Edit1.Text:=FloatToStr(c);
end;
end;

подскажите что здесь не правельно в этой строке?


Просмотр ответов:
http://programmersforum.ru/showthread.php?t=4095

Posted in Общие вопросы Delphi by Alar



Другие вопросы:
Секундомер
размер массива
Запуск приложения из DLL
Распечатать текст с помощью printdialog с Richedit
Как узнать изменилась ли раскладка клавиатуры?



<<<Назад    Вперёд>>>