Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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



Страницы: 1 вся ветка

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

Наверх





Память: 0.44 MB
Время: 0.006 c
14-81061
spb
2002-03-20 11:21
2002.04.25
ИМХО?.. Что такое ИМХО?


1-80843
Rammst
2002-04-13 07:49
2002.04.25
PlaySound


3-80837
Андрей Брусов
2002-04-04 09:13
2002.04.25
Языковые драйверы в BDE


3-80772
alehan
2002-03-15 18:46
2002.04.25
TDateTimeField.EditMask


1-80911
kopachev
2002-04-15 12:11
2002.04.25
Текст в StringGrid





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский