|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Проблемы с паролем при запуске
Как сделать так что бы програма проверила перед запуском
checkbox1. если checkbox1 с галочкой то скрыть главное окно показать окно ввода пароля или по обраному если без галочки то показать главное окно скрыть окно ввода пароля. |
#2
|
||||
|
||||
Цитата:
Если тебе нужно выяснить требуется ввод пароля или нет, то настройки эти нужно хранить где-то "снаружи". Например в реестре или во внешних файлах. Читать файл/реестр перед созданием главной формы, устанавливать некую глобульную для программы переменную-флаг, а при создании, хотя нет, при визуализации (OnShow) главной формы проверять эту переменную и выполнять действия в зависимости от ее значения. Небольшой примерчик: Глобальная переменная у нас будет AskPassword В project.dpr Код:
uses ...,registry; .... var Reg:TRegistry; begin Application.Initialize; Reg:=TRegistry.Create; with Reg do begin .... AskPassword:=Reg.ReadBool('AskPassword'); end; Reg.Free; Application.CreateForm(TForm1, Form1); Application.Run; end; Код:
begin if AskPassword then begin //Тут спросили пароль AskPassword:=not(AskPassword); //Это чтобы при следующем OnShow пароль заново не спрашивался end else begin //Тут если пароль не нужен end; end; Вот так примерно |