Listbox durchsuchen

[DeddyH]

Ich bin nicht sicher, aber bringt es etwas, wenn Du es mit BeginUpdate und EndUpdate versuchst? Pseudocode:

Delphi-Quellcode:

procedure TDeinForm.ListBoxKeyPress(Sender: TObject; var Key: Char);
begin
  ListBox.Items.BeginUpdate;
  try
    StringVar := StringVar + Key;
    ...
  finally
    ListBox.Items.EndUpdate;
  end;
end;

Wie gesagt, nur eine ungetestete Idee.