Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!

Mobiles Hauptmenü

Aktives Steuerelement soll Hintergrundfarbe ändern wenn es den Fokus erhält

Begonnen von herb54, August 19, 2018, 15:26:59

⏪ vorheriges - nächstes ⏩

herb54

Hallo,

ich habe mich mal etwas durchgegoogelt, bin aber noch nicht auf eine brauchbare Lösung gekommen:
Ich möchte, dass sich ein aktives Textfeld (welches gerade den Focus hat) in der Hintergrundfarbe ändert (zur besseren Erkennung welches Eingabetextfeld gerade aktiv ist) .

Das heißt im ersten Schritt müsste mal abgefragt werden, welches Steuerelement gerade den aktiven Focus hat und dann  müsst die Hintergrundfarbe
geändert werden. Bei der Hintergrundfarbe gibt es die Eigenschaft BackColor.
Hier wird in einem Beispiel einer "long" Variablen ein Farbwert über RGB zugeteilt:

Dim lngRed As Long
lngRed = RGB(255, 0, 0)
und dann einem Textfeld zugeordnet:
Me!txtPastDue.BorderColor = lngRed

Hier habe ich schon die erste Frage:
Im Eigenschaftsblatt von Access verbirgt sich für rot: #ED1C24
Wie hängen diese Angaben RGB und #ED1C24 zusammen?

Wie kann ich den Fokuserhalt prüfen?

Im Voraus vielen Dank!
Herbert

Beaker s.a.

Hallo Herbert,
Zitatwelches Steuerelement gerade den aktiven Focus hat
Screen.ActiveControl

Dazu braucht es aber eigentlich keinen Code, das schafft die bedingte Formatierung.
Im Assi wählst du im ersten (linken) Dropdown die Option "Feld hat Focus".

ZitatWie hängen diese Angaben RGB und #ED1C24 zusammen?
Das muss dir ein Informatiker beantworten.

gruss ekkehard
Alles, was geschieht, geschieht. - Alles, was während seines Geschehens etwas anderes geschehen lässt, lässt etwas anderes geschehen. - Alles, was sich selbst im Zuge seines Geschehens erneut geschehen lässt, geschieht erneut. - Allerdings tut es das nicht unbedingt in chronologischer Reihenfolge.
(Douglas Adams, Mostly Harmless)

herb54

Super, vielen Dank! Das geht mit der bedingten Formatierung wirklich einfacher!
Grüße
Herbert