Einzelnen Beitrag anzeigen

Papaschlumpf73

Registriert seit: 3. Mär 2014
Ort: Berlin
171 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: Offene TDBLookupComboBox verursaxht Exception bei ESC-Taste

  Alt 2. Mai 2017, 11:44
Das hatte ich auch schon mal, bin aber zu faul solchen Fehlern auf den Grund zu gehen. Das hier hilft jedenfalls:

Delphi-Quellcode:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
if DBLookupComboBox1.ListVisible then
 begin
 DBLookupComboBox1.CloseUp(true);
 Abort;
 end;
end;
  Mit Zitat antworten Zitat