Помогите разобраться с переменной.

[СерёгаКот]

Добрый день уважаемые "Жуковцы". Недавно в дельфи, хотел бы написать пароль на программу. Помогите заполнить места пропусков (Желательно с объяснением). Пароль должен будет вводится в Edit1.

Var ...:string;
Begin
...='Пароль';
If ...='Пароль' then
begin
ShowMessage('Удачно');
end

else
begin
ShowMessage('Ошибка');
end;

[VeTaL_UA]

Var s:string;
Begin
s='Пароль';
 If Edit1.Text=s then
  begin
  ShowMessage('Удачно');
  end
 else
  begin
  ShowMessage('Ошибка');
  end;
end;

ПыСы: защита ломается за 15 секунд, 13 с которых загружается дебагер...

[СерёгаКот]

Спасибо большое! Дело не в самом пароле. Изучаю конструкцию "If, Then, Else"