Показать сообщение отдельно
  #2  
Старый 21.06.2009, 00:41
Аватар для Admin
Admin Admin вне форума
Администратор
 
Регистрация: 03.10.2005
Адрес: Россия, Москва
Сообщения: 1,553
Версия Delphi: Delphi 7
Репутация: выкл
По умолчанию

Цитата:
Сообщение от Lisdrummer
Здравствуйте! Подскажите пожалуйста, как сделать что бы при нажатии на кнопку появлялаь табличка(текстовое поле) с предложением ввести ОПРЕДЕЛЕННЫЙ пароль(он должен быть указан в исходнике)? Также нужно чтобы при неверном введении пароля действие для которого предназначается кнопка, не выполнялось!

Заранее ОГРОМНОЕ спасибо за ответ!
Код:
begin
 if InputBox('Вход','Введите пароль:','')='123'
 then ShowMessage('OK')
 else Close;
end;