ListBox przesuwanie do...

Witam! Taki szybki problem z którym jakoś sobie nie moge poradzić.

Mam w tlistbox listę jakiś tam słówek. Chcę aby po wpisaniu do tedit jakiegoś znaku np. "wa" przesunęło mnie do pierwszego słowa zaczynającego się od tych znaków np. "watykan" jak to wykonać? Bardzo proszę o pomoc! :-)

//EDIT

dobra.. problem rozwiązany :) sorki za zbędny temat :D

Zobacz to:

Jak zrobić program na zasadzie helpa - wyszukuje żądaną pozycję

BTW jak zaznaczysz listbox i zaczniesz pisać to co prawda nigdzie nie zobaczysz co piszesz, ale efekt będzie ten sam.

W edit.onChange dajesz coś takiego

for i:=0 to listbox.items.count -1 do
  begin
    if substr(listbox.items[i],1,length(edit.text)) = edit.text then
      begin
        listbox.itemindex := i;
        break;
      end;
  end;

Pisane z palucha, więc może nie do końca działać...

Pozdro.