Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Форма авторизации


DimNK ©   (2002-04-13 12:24:00) 

Подскажите как проавильно сделать авторизацию.
Я делаю вот так.
Application.Initialize;
Application.CreateForm(TDM, DM);
? Application.CreateForm(TfrmQuestion, frmQuestion);
Application.CreateForm(TfrmLogin, frmLogin);
frmLogin.ShowModal;
if frmLogin.user_id<>"-1" then
begin
Application.CreateForm(TfrmEditSubject, frmEditSubject);
Application.CreateForm(TfrmUser, frmUser);
Application.Run;
end;
Но когда создается frmQuestion она сразу активируется.
А если frmLogin ставить главной формой тогда она она вылазит после закрытия всех остальных форм.


Anatoly Podgoretsky   (2002-04-13 13:29:00) [1]

Тебе надо вывести форму авторизации за пределы цикла создания форм, до initialize или вызывать ее из frmQuestion


DimNK   (2002-04-13 12:40:00) [2]

Главной я хочу frmQuestion, но так, чтобы сначала вылазила авторизация. Если успешная грузится главная, если нет - все закрывается


Anatoly Podgoretsky   (2002-04-13 12:34:00) [3]

А ты какую хочешь главной


Наверх

Титульная страница Поиск, карта сайта Написать письмо