Разрушения формы Password Dialog после проверки пароля.

← →
INTAARI (2004-06-23 10:11) [0]

Доброе утро господа!!!
Я добавил в программу форму ввода пароля. По человечески ее надо после проверки пароля закрыть (form1.close), но закрывается все приложение. Если ее просто спрятать (form1.hide), то форма которая открывается за ней при сворачивании помещается в нижнем углу рабочего стола. Подскажите пожалуйста как правильно поступить с формой ввода пароля после того как она уже не нужна. И еще вопрос, имеет ли значение порядок создания форм.

procedure TfrmPasswordDlg.OKBtnClick(Sender: TObject); begin if edtPassword.Text="123456" then begin Application.CreateForm(TfrmSet, frmSet); Application.CreateForm(TfrmGMP, frmGMP); frmPasswordDlg.Hide; end else begin MessageDlg("Введен неверный пароль",mtWarning,[mbOK],0); edtPassword.Text:=""; edtPassword.SetFocus; end; end;

← →
Алхимик © (2004-06-23 10:14) [1]

Дай .dpr
Скорее всего эта форма является у тебя главной формой приложения.
Закрыл главную форму - закрыл приложение.

← →
Юрий Федоров © (2004-06-23 10:16) [2]

не исполоьзуй при создании формы пароля Application в качестве owner.
Видимо она у тебя получается главной формой

← →
INTAARI (2004-06-23 10:16) [3]

По идее главная форма приложение должна стать frmGMP
rogram GMP; uses Forms, Pass in "Pass.pas" {frmPasswordDlg}, Unit_Meteo in "Unit_Meteo.pas" {frmGMP}, Seting in "Seting.pas" {frmSet}; {$R *.RES} begin Application.Initialize; Application.Title := "Гидрометеопост"; Application.CreateForm(TfrmPasswordDlg, frmPasswordDlg); Application.Run; end.

← →
_ALEXey_ (2004-06-23 10:19) [4]

В опциях проекта убери форму из автоматически создаваемых и создавай ее динамически в .dpr перед другими Application.CreateForm, проверяй пароль, разрушай форму, затем уже пусть создаются остальный формы (если пароль верный).

← →
Алхимик © (2004-06-23 10:22) [5]

> [3] INTAARI (23.06.04 10:16)
> По идее главная форма приложение должна стать frmGMP

Так и создавай её первой.
А пароль запрашивай после.
Например так:
http://www.delphikingdom.ru/asp/viewitem.asp?UrlItem=/helloworld/rightdialog.htm

> По идее главная форма приложение должна стать frmGMP

где ж главная-то ?

вот же строчка, создающая главную форму :

Application.CreateForm(TfrmPasswordDlg, frmPasswordDlg);

← →
INTAARI (2004-06-23 10:37) [7]

Спасибо всем за советы!!!

Разрушения формы Password Dialog после проверки пароля. Найти похожие ветки