LoginSuccessful is a boolean variable in frmLogin which has to
be set True or False.
Application.Initialize;
Application.CreateForm(TfrmMainForm, frmMainForm);
Application.CreateForm(TdmdSecureApp, dmdSecureApp);
Application.CreateForm(TfrmLogin, frmLogin);
frmLogin.ShowModal;
if frmLogin.LoginSuccessful <> True then
Exit;
Application.Run;
regards,
NIRAV KAKU
On 12 Oct 01, at 13:03, [EMAIL PROTECTED] wrote:
> On Fri, 12 Oct 2001 00:38:12 +0530, you wrote:
>
> >Quiet simple.
> >
> >Open the project source file. Before the Application.Run method,
> >do a LoginForm.Create and ShowModal. In that itself you can
> >decide if you want to continue else you can always do a
> >Application.Terminate.
> >
> say what??
>
> ...
> Brendon Toogood
>
> E-Mail [EMAIL PROTECTED]
> ---------------------------------------------------------------------------
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
> Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
> Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
>
- From the Shreemat Bhägwat Gïta -
'Sarcasm is the lowest form of wit.'
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
