Hilfe mit einer ListBox und einem Edit programmieren

[arbu man]

Ich würd die listbox mit einer Schleife durchlaufen und pos verwenden:
(so in etwa)

Delphi-Quellcode:

var i: integer;
begin
  for i:=0 to searchbox.items.count-1 do begin
     if pos(lowercase(searchedit.text),lowercase(searchbox.items[i]))<>0 then begin
       searchbox.ItemIndex:=i;
       break;
     end;
  end;
end;