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
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)