Listbox einträge Markieren

[delphis spassbremse]

Moinzen...

ich habe folgendes Problem...
Ich habe ca. 120 Benutzer in einer Listbox.

Jetzt will ich eine art suchfunktion einbauen,
dass wenn ich was in ein Edit Feld eingebe (z.B. "S")
dann, soll der erste Eintrag mit S markiert werde.
Wenn ich jetzt "Sa" eingebe, soll der erste
Eintrag mit "Sa" markiert werden usw.

Hat da jemand nen lösungsvorschlag??