TFormEx
Basis Formular Klasse.
Eigenschaften
|
Eigenschaft |
Beschreibung |
Zugriff |
|---|---|---|
|
OrigCapt:C |
Fenster-Titel, nicht die Eigenschaft Caption verwenden da diese bei Docking-Fenstern überschrieben wird. |
Lesen/Schreiben |
|
ActiveControl:O |
Fokusiertes Steuerelement bei Start |
Lesen/Schreiben |
|
ImageIndex:N |
ImageIndex aus be-ImageList für Icon im Fenster-Navigator |
Lesen/Schreiben |
|
PositionSaveId:C |
@+5 Zeichen für ID, zum Speichern der Größe/Position |
Lesen/Schreiben |
|
Position:C |
poDesigned = Standard-Wert ab D2007, damit Formular immer an gleicher Position geöffnet wird |
Lesen/Schreiben |
Verwendung
Im F12-Designer ist es die Standard Fenster-Klasse
Beispiel
|oForm, oButton, oEdit|
// Form Object und Demo Steuerelemente erzeugen
oForm := CreateObject('TFormEx'),
oButton := CreateObject('TBeBitBtn',,oForm,oForm),
oEdit := CreateObject('TBeEdit',,oForm,oForm),
startseq
oForm.Width := 200, // Breite des Fensters
oForm.Height := 150, // Höhe des Fensters
oForm.OrigCapt := 'Demo', // Titel des Fensters
oForm.ActiveControl := oEdit, // Fokusiertes Steuerelement bei Start
oForm.ImageIndex := 1, // ImageIndex aus be-ImageList für Icon im Fenster-Navigator
oForm.Position := poDesigned, // Standard-Wert ab D2007, damit Formular
// immer an gleicher Position geöffnet wird
oForm.PositionSaveId := '@DEMO1', // @+5 Zeichen für ID zum speichern der Position
// Demo Steuerelemente
oEdit.Top := 20,
oEdit.Left := 20,
oEdit.Text := today(),
oButton.Top := 60,
oButton.Left := 20,
oButton.Caption := 'Demo',
ShowModal(oForm),
always
DestroyObject(oForm),
stopseq,