Как сделать сравнение строк без учета ригистра?

[slim>>>]

Подскажите пожалуйста как сделать сравнение строк без учета ригистра?
В этом куске

for i:=0 to (lst5.Items.Count-1) do
if Pos(edt1.Text,lst5.Items[i])<>0 then
lst11.Items.Add(lst5.Items[i]);

Не кричите сильно плиз

if Pos( LowerCase(edt1.Text), LowerCase(lst5.Items[i]) )<>0 then - так ошибка(

[fenix-elite]

Ну во-первых, через POS ты их не сравнишь, ибо тогда если сравнивать, то 1=123456

 if LowerCase(edit1.Text) = LowerCase(edit2.Text) then

[Баламут]

Функция WideCompareText. Описана в модуле SysUtils