Тема: Password Dialog
Показать сообщение отдельно
  #4  
Старый 23.05.2012, 22:47
SniperKz SniperKz вне форума
Прохожий
 
Регистрация: 23.05.2012
Сообщения: 3
Репутация: 10
По умолчанию

Цитата:
Сообщение от Snake22
конечно можно. что мешает? =)
Код:
  
const 
pass1='123';
masterpass='456';
  
begin
 if Password.Text = pass then
  begin 
       CanClose:=true;
       Form1.pgc1.Visible := True;
   end else
  if  Password.Text = masterpass then
   begin
       ЧТОТОТАМ.visible:=true;
   end
else 
   Application.Terminate;
end;

Спасибо работает) делал примерно также, но не много ошибался)
Ответить с цитированием