![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Форма регистрации. [D7, WinXP]
Gear © (2005-01-11 15:51:00)Добрый день! Подскажите пожалуйста как сделать в программе так чтобы первой отображалась форма регистрации. В случае если прогрмма зарегистрирована (проверка осуществляется в этой форме), то форма бы закрывалась и уничтожалась и при этом запускалась бы основная форма программы. Если программа не зарегистрирована то пока программу не зарегистрировали клиент видел бы только окно регистрации. Впринципе стандартный случай.
__я_ (2005-01-11 16:04:00) [1]пропиши в реестре регистрационный ключ и проверяй его при запуске
Семен Сорокин (2005-01-11 16:04:00) [2]в OnCreate главной формы, или в блоке dpr до создания гл. формы:
with TRegistrationForm.Create(nil) do
try
if ShowModal <> mrOk then begin // не зарегистрирована
Application.ShowMainForm := false;
Application.Terminate;
Exit
end
finally
Free
end