Классы и объекты в Object Pascal. Семенов Н.М. - 16 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

Составители: 

Рубрика: 

end;
Для действительного выделения памяти под запись Вы должны объявить
переменную введенного типа следующим образом:
var
MyRecord: TRecordType;
Предыдущее объявление достаточно для выделения памяти, обеспечивающей
существование переменной и присваивание значений её полям. Память выделяется для
экземпляров записи статическим способом, т.е. во время трансляции.
С объектами ситуация другая. Не только объявление класса объектов, но и
введение переменных этого типа недостаточно для получения действительных
экземпляров. Вы должны выполнить дополнительный шаг для инициализации
переменной. Например, следующее описание имитирует способ определения
переменной записи:
1: unit Unit1;
2:
3: interface
4:
5: uses
6: Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
7: Dialogs, StdCtrls;
8:
9: type
10: TColorRect=class
11: FLeft, FTop, FRight, FBottom: Integer;
12: FColor: TColor;
13: end;
14:
15: TForm1 = class(TForm)
16: end;
17:
18: var
19: Form1: TForm1;
20: ARect: TColorRect;
21:
22: implementation
23:
24: {$R *.dfm}
25:
26: begin {секции инициализации}
27: ARect:=TColorRect.Create;
28: ARect.FLeft:=10;
29: MessageDlg('Hi',mtInformation,[mbOK],0);
30: end.{модуля и секции инициализации}

Страницы