Скачать: CL | DM;

Разрушения формы 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

---

← →
Digitman ©   (2004-06-23 10:28) [6]

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


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

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

Application.CreateForm(TfrmPasswordDlg, frmPasswordDlg);

---

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

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

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c