Function Определяет подпрограмму, которая возвращает значение
Is Проверяет, является ли объект потомком класса или его родителем
Procedure Определяет подпрограмму, которая не возвращает значение
Пример кода : Установка нескольких свойств основной формы программы
// Полный код Модуля. // ----------------------------------------------------------- // Вы должны поместить этот код в модуль с именем Unit1 и с формой // названную Form1, которая имеет событие OnCreate названное FormCreate.
unit Unit1;
interface
uses
Forms, Dialogs, Classes, Controls, StdCtrls, Windows;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
end;
var
Form1: TForm1;
implementation
{$R *.dfm} // Вложение определений формы
procedure TForm1.FormCreate(Sender: TObject);
begin // Использование Self для идентификации формы позволяя нам // установить некоторые атрибуты формы Self.Caption := 'Test program'; Self.Visible := True;
end;
end.
