Pascal 7 & Objects

       

Вызов конструктора


-----------------------------------------------------------------

Чтобы построить объект диалогового блока, вызовите конструк- тор Init. Init воспринимает в качестве своих параметров указа- тель на порождающее окно и параметр типа PChar, представляющий имя ресурса диалога:

ADlg:=New(PSampleDialog, Init(@Self, 'EMPLOYEEINFO'));

Если идентификатор задается номером, его требуется привести с помощью MakeIntResource к PChar:

Dlg := New(PSampleDialog, Init(@Self, PChar(120)));

Так как диалоговые блоки обычно строятся внутри метода окон- ного объекта, порождающее окно почти всегда задается как Self. Объекты диалоговых блоков, не создаваемые оконными объектами, должны иметь в качестве порождающего Applicartion^.MainWindow (поскольку это единственный оконный объект, всегда присутствующий в каждой программе ObjectWindows).



Содержание раздела