4.3.11 Welches sind Besonderheiten von Textfeldern?
Text

Festlegen des Textes
MyCtrl.Model.Text = "Hallo" oder MyCtrl.Text = "Hallo"
Abfragen des Textes
MyText = MyCtrl.Model.Text oder MyText = MyCtrl.Text

SelectedText
Ermöglicht den Zugriff auf den markierten Text eines Eingabefeldes. Steht direkt unter dem Objekt zur Verfügung.
MyText = MyCtrl.SelectedText

Max. Textlänge
Mit dieser Einstellung kann man die maximale Eingabelänge des Textes einschränken. Die  maximal Länge beträgt 65535 Zeichen.
myctrl.model.maxtextlen = 10

Ausrichtung
Bestimmt ob der Text im Eingabefeld links,rechts oder zentriert angezeigt wird.

mycrtl.model.align = 1
Wobei gilt:
0 = linksbündig (Standardvorgabe)
1 = zentriert
2 = rechtsbündig

Rahmen

Legt die Eigenschaft des Rahmens fest. Es gibt drei verschiedene: 3D-Look, Flach oder ohne Rahmen.
Starbasic: myctrl.model.border = 1
Wobei gilt:
0 = Ohne Rahmen
1 = 3D-Look (Standardvorgabe)
2 = Flach


Zeichen bei Passwörtern
Es wird das Zeichen, das im Eingabefeld für eingegebene Zeichen erscheint, eingegeben. Dies dient zum Beispiel der Passwortverschlüsselung.
In der IDE können Buchstaben eingeben werden. In Starbasic muss der Charwert des Zeichens übergeben werden. Zum Beispiel 42 für das Sternchen.
Die Eigenschaft ist entgegen der Dokumentation eine Integer-Variable und keine String- Variable.

MyCrtl.Model.EchoChar = 42


Mehrzeilig
Bestimmt ob der Text mehrzeilig oder einzeilig eingegeben werden kann. Ist das Textfeld auf mehrzeilig nein gesetzt wird der überstehende Teil eines Satzes nur mit dem Cursor sichtbar.
MyCtrl.Model.MultiLine = true / false

Horizontaler Scrollbalken und vertikaler Scrollbalken

Bestimmt ob Scrollalken horizontal und/oder vertikal sichtbar wird, um in Texten die größer als das Textfeld sind zu navigieren.
Diese lassen sich nur aktivieren wenn die Eigenschaft des Textfeldes bei Mehrzeilig auf True steht.

Sollte eigentlich in Starbasic mit folgenden Befehlen gehen:
Für den vertikalen Balken: MyCtrl.Model.VScroll = true / false
Für den horizontalen Balken: MyCtrl.Model.HScroll = true / false
Stimmt aber nicht.

Textcolor
Eine zusätzliche Eigenschaften ist Textcolor, mit der die Textfarbe eingestellt werden kann. Dies geht nicht in der IDE, sondern nur vor dem Öffnen des Dialoges im Programm.

MyCtrl=MyDlg.getControl("Label1")
myctrl.model.textcolor = 255