Further to this:
I have tried putting the
RxLoginDialog1.Active := True; (with this set to False at design time)
in the FormCreate, FormShow and FormActivate events
all to no avail.
Mark
----- Original Message -----
From: "Mark Howard" <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Tuesday, September 11, 2001 2:17 PM
Subject: Re: [DUG]: Where to enable Login Component
> Ed
> I think that's where I started, and it didn't work, so changed it to the
> $DEFINE.... format.
> Just checked it again and it with LOGIN in place of {$DEFINE LOGIN} it
still
> doesn't work.
>
> In fact, if I remove the {$IFDEF LOGIN} {$ENDIF} pairing, leaving an
> unconditional
> RxLoginDialog1.Active := True; (with this set to False at design time)
> in the MainForm.FormCreate event it STILL doesn't work.
>
> So, I guess the problem is where to activate the LoginDialog - earlier
than
> FormCreate yet after the dialog has been created?
>
> Anyone else faced this problem?
>
> TIA
>
> Mark
> ----- Original Message -----
> From: "Edward Aretino" <[EMAIL PROTECTED]>
> To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
> Sent: Tuesday, September 11, 2001 10:31 AM
> Subject: Re: [DUG]: Where to enable Login Component
>
>
> > {$DEFINE LOGIN} is what you would use in code - at the top of your
unit
> > for instance. In the project options, just use: LOGIN
> >
> > Ed
> >
> >
> > At 13:45 10/09/2001 +1200, you wrote:
> > >Hi
> > >
> > >I want to require a login to my app on one site's copy only.
> > >
> > >I dropped an RXLib Login component onto the main for of the app and
> > >provided some user and password checking code.
> > >
> > >At design time I can set the login component to active or inactive.
> > >
> > >That's all works fine BUT
> > >
> > >If I go Project/Options and add a conditional define {$DEFINE LOGIN}
> > >
> > >and then do
> > >
> > >procedure TMainForm.FormCreate(Sender: TObject);
> > >begin
> > > {$IFDEF LOGIN} RxLoginDialog1.Active := True;
> > > {$ENDIF}
> > >end;
> > >Rebuild - run
> > >
> > >it doesn't work.
> > >
> > >What am I missing please?
> > >
> > >TIA
> > >
> > >Mark
> >
>
> --------------------------------------------------------------------------
> -
> > 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/
> >
>
> --------------------------------------------------------------------------
-
> 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/
>
---------------------------------------------------------------------------
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/
