Текущий архив: 2008.02.03;
Скачать: CL | DM;
Вниз
Запороливание Найти похожие ветки
← →
DEEEEMO © (2008-01-06 15:18) [0]Люди помагите как на свою прогу поставить пороль при входе, необезательно очень крепкою. И какой код нужен для кнопки "Оора папок" и последственным вводом в строку EDIT.
← →
Юрий Зотов © (2008-01-06 15:29) [1]И, конечно же, высшее образование...
:-(
← →
Плохиш © (2008-01-06 15:46) [2]
> Юрий Зотов © (06.01.08 15:29) [1]
Это демо версия ;-)
← →
{RASkov} © (2008-01-06 17:08) [3]> [0] DEEEEMO © (06.01.08 15:18)
И что у тебя не получается? Или тебе рассказать от А до Я? Тогда книжки нужно читать, а не на форумах спрашивать.....
← →
Denis__ © (2008-01-07 19:15) [4]
> "Оора папок
что за зверь?
← →
XerSon (2008-01-08 11:16) [5]
program password;
uses
forms,
dialogs, // В этом модуле определена функция inputquery
unit1 in "unit1.pas" {mainform};
{$r *.res}
var
passwrd: string;
begin
// Запрашиваем пароль:
if inputquery("Окно ввода пароля","Введите пароль:",passwrd) then
// Проверяем его:
if passwrd = "delphi" then
begin // Все в порядке, пароль верен
application.createform(tmainform, mainform);
application.run;
end else
showmessage("Пароль не верен!");
end.
← →
Malina (2008-01-08 13:30) [6]А чего б протектором не воспользоваться, например ExePass или Armadillo?
← →
Yury_FK (2008-01-10 08:31) [7]необезательно очень крепкою - а что эта фраза означает?
Страницы: 1 вся ветка
Текущий архив: 2008.02.03;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.016 c
