procedure InitButton(Data: PControlData; Info: PDialogInfo);
Erzeugt je nach Schalter-Stil folgende Dialogelemente:
Stil Dialogelement
---------------- -------------------------------------------------------
bs_PushButton TButton mit Flag bfNormal.
ID-Wert wird mittels XlatCmd in ein Kommando gewandelt.
bs_DefPushButton TButton mit Flag bfDefault.
ID-Wert wird mittels XlatCmd in ein Kommando gewandelt.
bs_3State, T3StateBox-Objekt. Das Gruppenflag wird ausgewertet.
bs_Auto3State
bs_CheckBox, TCheckBox-Objekt. Das Gruppenflag wird ausgewertet.
bs_AutoCheckBox
bs_RadioButton, TRadioButton-Objekt. Das Gruppenflag wird ausgewertet.
bs_AutoRadioButton
bs_GroupBox TRectangle-Objekt und TStaticText-Objekt
für Beschriftung oben links.
sonst TButton-Objekt.
Diese Erzeugungsprozedur wird von RegisterGvWinDlg
mit den Klassen cl_Button, 'BorRadio' und 'BorCheck' verbunden.