Einzelnen Beitrag anzeigen

Benutzerbild von rapante
rapante

Registriert seit: 3. Jun 2009
Ort: OPR
171 Beiträge
 
Delphi XE2 Professional
 
#3

Re: automatische Suche in ListBox abschalten

  Alt 30. Mär 2010, 18: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;
  Mit Zitat antworten Zitat