Форум: "Основная";
Текущий архив: 2004.09.26;
Скачать: [xml.tar.bz2];
Вниз
Математические операции Найти похожие ветки
← →
M-Alex (2004-09-13 18:56) [0]Я недавно начел программировать на Delphi и не могли бы вы подсказать, как сделать: Данные из Edit1 умножаются на Edit2, и ответ выводится в Edit3 всё это происходит по нажатию Button1.
← →
Palladin © (2004-09-13 18:59) [1]StrToInt/StrToIntDef + F1
← →
Vasya.ru (2004-09-13 21:21) [2]Form1.Button1.ButtonClisk (Sender : TObject)
Var
a, b, c : integer;
Begin
a := StrToInt(Edit1.text);
b := StrToInt (Edit2.text);
Edit3.Text := IntToStr(a * b);
End;
Калькулятор пишешь? Я тоже в сопливые годы писал...
← →
Vasya.ru (2004-09-14 00:06) [3]Чушь написал, каюсь
← →
Defunct © (2004-09-14 06:19) [4]
procedure TForm1.Button1Click(Sender: TObject);
Var V1,V2:Variant;
begin
V1 := Edit1.Text;
V2 := Edit2.Text;
Try
Edit3.Text := V1 * V2;
Except
Edit3.Text := "?????";
End;
end;
← →
Defunct © (2004-09-14 06:32) [5]> Калькулятор пишешь? Я тоже в сопливые годы писал...
> Form1.Button1.ButtonClisk
looks like someone is still in snotty ages ;)
← →
Vasya.ru (2004-09-14 10:49) [6]Defunct © (14.09.04 6:32) [5]
Первый раз в жизни слово "клик" на английском писал, отсюда и ошибка
← →
TUser © (2004-09-14 11:19) [7]
> Первый раз в жизни слово "клик" на английском писал, отсюда
> и ошибка
Defunct не об этой ошибке говорит, кажется.
← →
Ega23 © (2004-09-14 11:33) [8]Defunct не об этой ошибке говорит, кажется.
ИМХО, и об этой тоже.
Кстати, о пцыцах: а где было сказано, что а и б - целые цисла?
← →
Vasya.ru (2004-09-14 14:36) [9]Кстати, о пцыцах: а где было сказано, что а и б - целые цисла?
А где было сказано, что нет.
procedure TForm1.Button1Click(Sender: TObject);
А здесь Ega23 спросит "А где было сказано, что Button1 находится на Form1?"
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.09.26;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.719 c
