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

CODE

|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,