ВУЗ:
Составители:
Рубрика:
Строка
TForm1 = class(TForm)
определяет новый класс TForm1, который порожден (создан по образцу)
от стандартного класса TForm. Строка
Form1: TForm1;
создает экземпляр этого класса с именем Form1. Стандартный класс
TForm описывает пустое Windows-окно, в то время как класс TForm1
описывает окно с уже вставленными в него компонентами “метка” и
“кнопка”. Описание этих компонентов содержат строки
Label1: TLabel;
Button1: TButton;
Они указывают, что компонент Button1 представляет собой экземпляр
стандартного класса TButton, а компонент Label1 – экземпляр класса
TLabel.
За именем процедуры Button1Click в круглых скобках следует описание
параметра вызова:
Sender: TObject
(параметр с именем Sender принадлежит классу TObject). Как мы уви-
дим дальше, процедуры могут иметь не один, а несколько параметров
вызова или не иметь их вовсе. Параметры вызова (если они есть) служат
для настройки реализованного в процедуре алгоритма на выполнение
конкретной работы. Параметр Sender вставлен Delphi “на всякий слу-
чай”: с его помощью подпрограмма Button1Click может при желании
определить, какой именно компонент создал событие OnClick. Вся
строка в целом
procedure TForm1.Button1Click(Sender: TObject);
называется заголовком процедуры. Ее завершает символ “;”. Этот сим-
вол играет важную роль в Object Pascal, т.к. показывает компилятору на
конец предложения языка. Из отдельных предложений составляется
весь текст программы. В конце каждого предложения нужно ставить
точку с запятой – это обязательное требование синтаксиса языка. Три
следующие строки определяют тело процедуры:
19
Страницы
- « первая
- ‹ предыдущая
- …
- 17
- 18
- 19
- 20
- 21
- …
- следующая ›
- последняя »
