Стр. 341 - Информатика. Программирование в среде Delphi. Часть 1

Информатика. Программирование в Delphi
341
интервале от 0 до 110.
then – to
Смотрите if.
try – попытка
Служебное слово try применяется для обработки исключительных ситуа-
ций. Служебные слова try и finally образуют блок. Действия, описанные в этом
блоке, выполняются независимо от того, возникла исключительная ситуация
или нет.
Пример:
procedure TFormGlavn.bt_OpenClick(Sender: TObject);
var
FormNew: TFormNew;
begin
try
FormNew:= TFormNew.Create(Self);
FormNew.Left:=100;
FormNew.Top:=200;
FormNew.Show;
finally;
FormNew.Free;
end;
В этом примере описана процедура, обрабатывающая щелчок на кнопке
bt_Open. После служебного слова var объявляется объект FormNew типа
TFormNew. В блоке try...finally записываются инструкции.
Первая из них создает форму FormNew с помощью метода Create – Соз-
дать. Здесь Self – Сам – неявная переменная, представляющая собой указатель
на экземпляр класса FormNew, который был использован при вызове метода.
Вторая инструкция устанавливает расстояние от левой границы формы до
левой границы экрана.
Третья инструкция устанавливает расстояние от верхней границы формы
до верхней границы экрана (в пикселях).
Четвертый оператор отображает окно формы на экране.
После блока записывается метод, удаляющий форму и освобождающий
выделенную под форму память.
type – тип
С зарезервированного слова type в модуле начинается раздел объявления
типов объектов модуля.
Пример: