TDBLookupComboBox

[marabu]

Funktioniert es so?

Delphi-Quellcode:

procedure TForm1.DBLookupComboBoxKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  with Sender as TDBLookupComboBox do
    if not ListVisible then
      Key := 0;
end;