| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
password
crunk © (2006-10-24 17:31:00)здраствуйте, подскажите пожалуйста как сделать, чтобы при входе в программу запрашивался пароль (который сам задашь), т.е. если неправильно ввёл, то пишется что не правильно, а если правильно то входит в программу
Джо (2006-10-24 17:40:00) [1]Как вас много...
crunk (2006-10-24 17:37:00) [2]пасибо!
azot (2006-10-24 17:36:00) [3]огромное спасибо!
Джо (2006-10-24 17:35:00) [4]
program Project1;
uses
Forms,
Dialogs,
Unit1 in 'Unit1.pas' {Form1};
{$R *.res}
var
S: string;
begin
InputQuery('Введи пароль','Пароль сюда!',S);
if S <> '12345' then
Halt;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
| |
