Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];




Вниз

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


DimNK   (2002-04-13 12:24) [0]

Подскажите как проавильно сделать авторизацию.
Я делаю вот так.
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 12:34) [1]

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



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

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



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

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




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];




Наверх






Память: 0.74 MB
Время: 0.017 c
6-81020           avk                   2002-02-07 11:03  2002.04.25  
Нужно напистать....


3-80795           Draculenok            2002-03-21 12:54  2002.04.25  
Вопрос по QReporty!!!!!!!!


3-80734           Sewix                 2002-04-02 23:37  2002.04.25  
Нужна альтернатива Qreport


3-80836           Alexsys               2002-04-05 23:38  2002.04.25  
GRID + несколько колонок в внем же...


1-80864           Филиппов Стас         2002-04-13 18:22  2002.04.25  
замена символов в Edit