Работа с формой!

[Lemo]

Подсчитать суму 2-х чисел и вывести результат! Все через форму сделать!

Я примерно знаю, как все делаеться, ну чего то у меня не получаеться!
Я так же прописал процедурку для кнопки "Расчитать!"
http://www.valar.ru/upload/png/1208/1230299284_.htm

[Terran]

Сообщение от Lemo

Подсчитать суму 2-х чисел и вывести результат! Все через форму сделать!

Я примерно знаю, как все делаеться, ну чего то у меня не получаеться!
Я так же прописал процедурку для кнопки "Расчитать!"
http://www.valar.ru/upload/png/1208/1230299284_.htm

Можете сделать так:

Procedure TForm1.Button1Click(Sender: TObject);
Begin
Edit3.Text:=IntToStr(StrToInt(Edit1.Text)+StrToInt(Edit2.Text));
End;

[Lemo]

Сообщение от Terran

Можете сделать так:

Procedure TForm1.Button1Click(Sender: TObject);
Begin
Edit3.Text:=IntToStr(StrToInt(Edit1.Text)+StrToInt(Edit2.Text));
End;

что тот ничего не помогает, я просто вставил код в код кнопки "Расчитать"!

[Terran]

что тот ничего не помогает, я просто вставил код в код кнопки "Расчитать"!

Я немножко поясню. Для начала создаёте обработчик события на нажатие кнопки. Потом вставляете туда этот код:

Edit3.Text:=IntToStr(StrToInt(Edit1.Text)+StrToInt(Edit2.Text));

В этом коде
Edit1 - это эдит в который вводится первое слагаемое;
Edit2 - это эдит в который вводится второе слагаемое;
Edit3 - это эдит в который выводится результат;
Проверьте имена ваших эдитов на форме, что бы они совпадали с именами указанными в коде.

[Lemo]

http://www.valar.ru/upload/png/1208/1230304241_.htm
Вот тако вот ?

[Terran]

Код вы написали правильно. Вот вам примерчик написал (на всякий случай) Сумма.rar

[Lemo]

http://www.valar.ru/upload/png/1208/1230305468_1.htm
Я очень рад, что нашелся человек, который может помочь!

[Terran]

У вас отсутствует файл Unit1.pas . Вы наверное его не сохранили или удалили.

[Lemo]

ну я весь твой архив ска4ал!

[Terran]

В архиве все файлы. Попробуй пересохранить весь проект.