Снятие чувствительности к регистрам

[4BlooD]

Проблема состорит в следующем. Имеется форма на которой расположено: Button, Edit, StringGrid(visible:=false). Необходимо вводить в Edit текст и нажимать Button. На кнопку имеется событие OnClick cодержащее:

if edit1.Text='администратор' then
Application.MessageBox('Вводить слово "Администратор" запрещено!','Ошибка', MB_ICONSTOP)
else stringgrid1.Show;

Вобщем при вводе в Edit слова "Администратор"(буквами верхнего или нижнего регистров) должна выдаваться ошибка. Если писать администратор прописными буквами, все работает нормально, если же использовать в слове администратор заглавные буквы, ошибка не выдается.

Подскажите как отключить чувствительность регистров чтобы прога заработала.

[SERG1980]

if AnsiUpperCase(edit1.Text)='АДМИНИСТРАТОР' then

или

if AnsiLowerCase(edit1.Text)='администратор' then

[4BlooD]

Спасибо большое, работает. Программа едет дальше ...