TBeEdit
TBeEdit
Standard Be-Eingabefeld
Eigenschaften
Eigenschaft | Beschreibung |
---|---|
IsLoaded:L | Muss auf 'True' gesetzt werden, um das Standard-Be-Kontextmenü zu erhalten |
AutoNextField:L | Wird der eingegebene Text länger als die Länge der Eingabemaske, so wird automatisch das nächste Control fokusiert |
Beispiel
CODE
//******************************************************************************
// Beschreibung: Dieses CodeBlock-Programm dient zur
// Demonstration der Klasse TBeInfoPanel
//******************************************************************************
| oForm, oEdit, oLabel |
//##############################################################################
//##############################################################################
// Initialisierung
//##############################################################################
//##############################################################################
// oFrom
oForm := CreateObject('TFormEx', 'frm_Main'),
oForm.Width := 300,
oForm.Height := 100,
// oEdit
oEdit := CreateObject('TBeEdit', 'edt_Test', oForm, oForm),
oEdit.Left := 100,
oEdit.Top := 5,
oEdit.Width := 180,
oEdit.Text := '',
oEdit.IsLoaded := True, // Wichtig, um das Be-Standard-Kontextmenü zu erhalten
// oLabel
oLabel := CreateObject('TLabel', 'lbl_Test', oForm, oForm),
oLabel.Left := 5,
oLabel.Top := 8,
oLabel.Caption := 'TBeEdit',
ShowModal(oForm),
DestroyObject(oForm),