Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.16;
Скачать: CL | DM;

Вниз

РАбота с несколькими формами   Найти похожие ветки 

 
Std   (2006-04-05 14:20) [0]

Доброго времени.
Существует 2 формы, одна форма для ввода логина и пароля, вторая основная. подскажите пж как мне зделать чтоб если логин и пароль введены правильные то форма входа закрывалась и запускалась главная форма. проьывал делать

mainForm.Show;
loginForm.Close;
но закрывается все приложение


 
balepa ©   (2006-04-05 14:26) [1]

А ты уверен что loginForm у тебя не главная ?
Я вот уверен что она у тебя главная.


 
Std   (2006-04-05 14:38) [2]

ну ладно делаю я главной  другую форму, но тогда мне приходица писать при ее загрузке шоб показывалась форма с входом и главная форма, а мне нада шоб показался только диалог входа а уже потом главная форма


 
Nick_serov   (2006-04-05 14:42) [3]

> Доброго времени.
> Существует 2 формы, одна форма для ввода логина и пароля,
>  вторая основная. подскажите пж как мне зделать чтоб если
> логин и пароль введены правильные то форма входа закрывалась
> и запускалась главная форма. проьывал делать
>
> mainForm.Show;
> loginForm.Close;
> но закрывается все приложение


Пробуй

loginForm.hide;


 
Гаврила ©   (2006-04-05 14:52) [4]

Главной формой должна быть mainForm
(потому что все приложение автоматом закрывается при закрытии главной формы)
а показзывать loginForm можно в mainForm.OnCreate


 
balepa ©   (2006-04-05 14:52) [5]

Самый простой способ:
В Unit"е проекта

begin
if InputBox("fff","ddddd","") = "11" then
begin
 Application.Initialize;
 Application.CreateForm(Tmainform,mainform);
 Application.Run
end
 else
   application.Terminate;
end.


 
Std   (2006-04-05 15:22) [6]

2Гаврила
выбивает ошибку acces volation read adres 000000
2balepa
так к сожалению не получится :( нада обизательно что бы форма была и пароль будет сравниватся с с паролями из БД


 
Плохиш ©   (2006-04-05 15:47) [7]

Application.ShowMainForm := false;


 
zorik ©   (2006-04-05 16:25) [8]


 Application.Initialize;
 FormPassword := TFormPassword.Create(Application);
 with FormPassword do
 try
   ShowModal;
   if not (
             (ModalResult = mrOk) //нажата кнопка "ok"
             and
             CheckPassword //функция проверки подлиности пароля
           )
     then Application.Terminate;
 finally
   Free;
 end;
 Application.CreateForm(TFormMain, FormMain);
 Application.Run;



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

Текущий архив: 2006.04.16;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.033 c
2-1143885475
EXILE
2006-04-01 13:57
2006.04.16
Как открыть в Delphi .exe файл


15-1142930772
Fedia
2006-03-21 11:46
2006.04.16
лучшая десятка фильмов


1-1142237489
DelphiLexx
2006-03-13 11:11
2006.04.16
Физические координаты курсора


3-1139599826
Варяг
2006-02-10 22:30
2006.04.16
Программное создание др-ра ODBC


2-1143966370
foks-06
2006-04-02 12:26
2006.04.16
Получение координат?