Тема: Основы объектно-ориентированного визуального программирования.
Проект Калькулятор
procedure TForm1.Button1Click (Sender: TObject);
var
a, b : integer ;
c: real ;
begin
a:=StrToInt ( Edit1.Text ) ;
b:=StrToInt ( Edit2.Text ) ;
c:=a+b;
Label3.Caption:= ’Ответ: ’+FloatToStr (c);
end.
Задание: Создать проект "Калькулятор"
