Focuswechsel

[DeddyH]

Dann eben anders:
ListBox1.Visible := (ActiveControl = Edit1) or (ActiveControl = Edit2) or (ActiveControl = ListBox1); Das müsste dann ins OnExit dieser 3 Controls, dann sollte es klappen, sofern ich keinen dummen Denkfehler mache.

[sx2008]

Zitat von bernau:

Wenn einer der Edits den Focus hat, dann soll die Listbox angezeigt werden. Ansonsten soll die Listbox nicht sichtbar sein.

Also ich habe noch kein Windows Programm gesehen, dass sich so seltsam verhält.
Als Benutzer würde mich diese auftauchende und verschwindende Listbox verwirren.
Und was wenn der Benutzer anstelle der Maus die Tastatur benützt um mit TAB ins nächste Control zu springen?

Schon mal daran gedacht einfach zweimal TCombobox anstelle der Edits zu verwenden?
Die Listbox wird dann natürlich nicht mehr gebraucht.

[Sir Rufo]

Machen wir doch mal ne LowRider Lösung (nicht schön aber selten)

Statt die Listbox im OnExit auszublenden starte einen Timer Timer1.Enabled := true; Das Interval würde ich auf 250ms setzen.
Im Timer dann

Delphi-Quellcode:

Timer1.Enabled := False;
ListBox1.Enabled := ListBox1.Focused or Edit1.Focused;

Gleichzeitig den Timer auch bei ListBox1.OnExit starten