Pos без учёта регистра

[fezilk25]

Pos('aSd',Memo1.text);

возвратит 0, если в Memo1:

wqerewasd

Как исправить? В программе первый параметр pos'а вводит пользователь.

[askarchic]

Используй - UpperCase

Pos(UpperCase('aSd'),UpperCase(Memo1.text));