Hi Äfan,
bei der Überprüfung musst du einfach Edit1.Text und ListBox1.Items[i] mit Hilfe von
LowerCase in Kleinbuchstaben umwandeln: aus
if Pos(Edit1.Text, ListBox1.Items[i]) > 0 then
wird dann
if Pos(LowerCase(Edit1.Text), LowerCase(ListBox1.Items[i])) > 0 then
Greetz
alcaeus