TEdit, Tastaturpuffer gefüllt?

[Sir Rufo]

Über einen Timer die Suchanfrage starten. Wegen des Intervalls musst du einfach mal schauen, was am effektivsten ist.

Ein hektischer Schnelltipper = 250ms
Ein entspannter Ein-Finger-Schreiber = 2000ms

Delphi-Quellcode:

procedure TForm1.EditSearchOnChange( Sender : TObject );
begin
  // Such-Timer zurücksetzen
  TimerSearch.Enabled := False;
  TimerSearchEnabled := True;
end;

procedure TForm1.TimerSearchOnTimer( Sender : TObject );
begin
  TimerSearch.Enabled := False;
  // Suche starten
  DoSearch( EditSearch.Text );
end;