Лабораторная работа №4. Работа с кнопками и таблицами

Работа с кнопками и таблицами

План работы:

1. Проект “Калькулятор”

Разработать проект, выполняющий простейшие арифметические действия над целыми и вещественными числами. Ввод чисел и выполнение действий в данном калькуляторе можно будет производить с помощью щелчка мыши по кнопкам формы. На этапе выполнения форма должна иметь следующий вид:

a) Создайте новый проект в Delphi и сохраните его в отдельной папке “Калькулятор”;

b) Оформите форму в соответствие с рисунком;

c) Установите свойство BorderStyle формы таким образом, что бы нельзя было изменить ее размер в процессе выполнения приложения.

d) Для компонента Edit (вкладка Standard) свойство ReadOnly установите true, т.е. текст нельзя будет редактировать, а можно только просматривать;

e) Обработайте событие OnClick для кнопки с заголовком “1” следующим образом:

procedure TForm1.Button1Click(Sender: TObject);

Var

s: string; {необходима для хранения цифры с заголовка кнопки}

Begin

{рассматриваем объект, вызвавший событие, как объект класса

TButton и выберем у него свойство Caption}

s:= (Sender as TButton).Caption;

{если в Edit1 уже что-то есть, кроме 0, то просто допишем туда

одну цифру}

Дата добавления: 2015-08-17