Für diesen Fall gibt es die Methode Find der ControllCollection. Der Methode muss der Name des Controls und ein LOGIC Wert übergeben werden,
der angibt, ob in allen untergeordneten Control Gruppen (GroupBoxen, TabControls, ... ) ebenfalls nach dem Control gesucht werden soll.
In meinem Beispiel habe ich auf der Form 4 TextBoxen mit den Namen TextBox1 - TextBox4.
Zusätzlich eine weitere TextBox mit dem Name sleEingabe und einen Button.
Bei einem Klick auf den Button wird nun folgender Source Code aufgerufen:
- Code: Alles auswählen
LOCAL oControl AS Control
LOCAL oControls AS Control[]
LOCAL oTextBox AS TextBox
oTextBox1:Text := ""
oTextBox2:Text := ""
oTextBox3:Text := ""
oTextBox4:Text := ""
oControls := SELF:Controls:Find( osleEingabe:Text, TRUE )
IF oControls:Length == 1
oControl := oControls[1]
oTextBox := (TextBox)oControl
oTextBox:Text := "Hab dich"
ENDIF
Das war's schon.
Ich rufe die Methode Find der ControlCollection auf und übergebe den Namen des gesuchten Controls (z.B. TextBox1).
Zusätzlich gebe ich True mit. Ich könnte in dem Beispiel auf False mitgeben, da auf meinem Fenster keine GroupBoxen oder
TabControls mit weiteren Controls vorhanden sind.
