Tipps & Tricks 11.12.2000, 15:30 Uhr

Füllfarbe eines Feldes bei Fokuserhalt ändern - Access 97

Wie kann ich Access 97 dazu bringen, in einem Formular die Hintergrundfarbe eines Eingabefeldes bei Fokuserhalt zu ändern? Nach Verlassen des Feldes sollte die Standardfarbe wieder hergestellt werden.
Öffnen Sie Ihr Formular in der Entwurfsansicht und klicken Sie dann auf den folgenden Button in der Symbolleiste, damit sich das Code-Fenster zu diesem Formular öffnet.
Erstellen Sie in diesem Fenster die folgenden zwei Funktionen:
Public Function setBackColorEin(ctl As Control)
ctl.BackColor = RGB(0, 255, 0)
End Function
Public Function setBackColorAus(ctl As Control)
ctl.BackColor = RGB(255, 0, 255)
End Function
Danach schliessen Sie das Code-Fenster und markieren alle Felder die beim Fokuserhalt die Farbe ändern sollen. Klicken Sie mit rechts in den markierten Bereich und rufen Sie die EIGENSCHAFTEN dieser Mehrfachauswahl auf.
Im Register EREIGNISSE geben Sie bei BEIM FOKUSERHALT den folgenden Befehl ein:
=setBackColorEin(Screen.ActiveControl)
In der Zeile BEI FOKUSVERLUST geben Sie folgenden Befehl ein, damit das Feld auch wieder zur anderen Farbe zurückwechseln kann:
=setBackColorAus(Screen.ActiveControl)
Der Text (Screen.ActiveControl) wird automatisch ins Deutsche übersetzt, darum brauchen Sie sich nicht zu kümmern.
Schliessen Sie das Eigenschaften-Fenster und kontrollieren Sie Ihre Funktion in der Formularansicht. Das sieht mit den hier eingestellten Farben dann so aus:
Tips zur Einstellung der Farbe erhalten Sie, wenn Sie im Code-Fenster den Cursor in den Text RGB(255,0,255) setzen und mit F1 das dazugehörige Hilfethema aufrufen.



Kommentare
Es sind keine Kommentare vorhanden.