Ich kam auf die verrückte Idee, die ComboBox so einzustellen, dass es, wenn es nicht dem Fokus hat, auch nicht den DropDown-Button anzeigt. Der Code sollte einfach sein:
Delphi-Quellcode:
procedure TForm1.ComboBox1Enter(Sender: TObject);
begin
ComboBox1.Style := csDropDown;
end;
procedure TForm1.ComboBox1Exit(Sender: TObject);
begin
ComboBox1.Style := csSimple;
end;
Bei OnEnter wird der Style csDropDown, sonst csSimple. Insoweit funktioniert es auch.
Das Problem ist, dass ich nach OnEnter nicht sofort auf DropDown-Button klicken kann. Tut sich nichts. Erst wenn ich erneut in das Fenster klicke, erst dann funktionert der DropDown-Button. Warum?