Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.08.28;
Скачать: CL | DM;

Вниз

Защита программы паролем   Найти похожие ветки 

 
TerminalHead ©   (2005-08-08 06:44) [0]

Мне надо сделать чтобы в ходе работы программы появлялось окно с вводом пароля, и если его не введешь то некоторые функции программы небыли доступны. Мне не нужна какая-нибудь навороченная защита, просто поле для ввода пароля, и чтобы пароль скрывался звездочками. Я знаю что такую защиту можно взломать с помощью блокнота :), но это не важно. Я это делаю так:
var
right_pass: string;
request: string;
begin
right_pass:="pass";
request:=InputBox("enter","password","");
if request <> "" then begin check:=0;
if request <> right_pass then check:=0;
end else begin
Application.Terminate
end;
if request = "pass" then check:=8765;


В принципе меня это устраивает, кроме того что пароль не скрывается звездочками.
Как мне реализовать скрытие вводимого пароля звездочками ?


 
Думкин ©   (2005-08-08 07:42) [1]

есть Password dialog
и есть TEdit.PasswordChar


 
evvcom ©   (2005-08-08 08:14) [2]


> Я знаю что такую защиту можно взломать с помощью блокнота
> :),

Ну, эт ты загнул. Такие защиты вскрываются усилием мысли и воли. :)



Страницы: 1 вся ветка

Текущий архив: 2005.08.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.066 c
14-1122002138
Funt_IK
2005-07-22 07:15
2005.08.28
Delphi 2005 Update 2-3


1-1123398075
kami
2005-08-07 11:01
2005.08.28
Непонятки с датами файлов


4-1121073249
Вт
2005-07-11 13:14
2005.08.28
Настройка экрана


14-1123239992
12DFBDDh
2005-08-05 15:06
2005.08.28
С днем железнодорожника!


14-1123348504
lookin
2005-08-06 21:15
2005.08.28
Подсветка элементов в Code Insight