Einzelnen Beitrag anzeigen

Benutzerbild von rapante
rapante

Registriert seit: 3. Jun 2009
Ort: OPR
172 Beiträge
 
Delphi 12 Athens
 
#3

Re: automatische Suche in ListBox abschalten

  Alt 30. Mär 2010, 19:10
...und damit das navigieren mit den PfeilTasten weiterhin funktioniert...

Delphi-Quellcode:
procedure TForm1.ListBox1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if not Key in [VK_UP, VK_DOWN] then
    Key := 0;
end;
Micha
  Mit Zitat antworten Zitat