Построение групповых блоков
-----------------------------------------------------------------
Конструктор 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));
