Pascal 7 & Objects

       

Построение групповых блоков


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

Конструктор Init группового блока кроме обычных 6 параметров воспринимает текстовую строку метки группы.

constructor TGroupBoxInit(AParent: PWindowsObject; AnID: Integer; AText: PChar; X, Y, W, H: Integer);

Типичное использование конструктора группового блока может быть следующим:

GroupBox1 := New(PGroupBox, Init(@Self, id_GB1, 'A Group Box', 38, 102, 176, 108));



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