PDA

Vollständige Version anzeigen : Farbe der Schrift in txt Box änder


Drox
12.07.2001, 17:18
Wie ändere ich während der Laufzeit die Farbe eines Textes in einer TextBox.

Benötige 2 Arten:
+ Textbox ist aktiviert
+ --"-- ist deaktiviert

Danke im Voraus.
(Ich weiss es wirklich nicht)

Stefan Kulpa
13.07.2001, 05:30
<font face="Verdana" size="2">Hallo,

Du setzt einfach die Eigenschaft ForeColor der betroffenen Textbox(en) auf einen neuen Wert.
Dieser Wert kann als VB-Konstante oder über die QBColor()-Funktion oder direkt als Zahl übergeben werden.</font>

<PRE><FONT SIZE=1 FACE=Courier New><FONT COLOR=#000080>Private</FONT> <FONT COLOR=#000080>Sub</FONT> Command1_Click()

<FONT COLOR=#008000>'** Farbzuweisung über QBColor</FONT>
Text1.ForeColor = QBColor(5)

<FONT COLOR=#008000>'** Farbzuweisung über VB-Konstante</FONT>
Text1.ForeColor = vbBlue

<FONT COLOR=#008000>'** Farbzuweisung als Wert</FONT>
Text1.ForeColor = &H800000

<FONT COLOR=#000080>End</FONT> <FONT COLOR=#000080>Sub</FONT>

</FONT></PRE>

<font face="Verdana" size="2">Die möglichen Werte für QBColor findest Du in der Online-Hilfe.
Die VB-Farbkonstanten findest Du u.a. im ObjektBrowser (F2 -> ColorConstants).
Für die direkte Zuweisung als Zahl erhälst Du die möglichen Werte im Eigenschaftsfenster der Textbox.

Eine deaktivierte Textbox zeigt allerdings immer den Inhalt grau an, sonst würde man ja auch nicht sehen, dass sie deaktivert ist.
Alternativ kannst Du die Farbe ändern und statt Enabled = False Locked = False setzen. Dann ist ein Bearbeiten nicht möglich, die Farbe läßt sich jedoch ändern.

HTH</font>

Drox
13.07.2001, 06:45
An dieser Stelle möchte ich einen GROSSEN Dank an Stefan aussprechnen, der mir mit seinen professionellen Antworten immmer wieder auf die Sprünge geholfen hat.
Ein 3 faches Hip Hip Hurra...