<< Click to Display Table of Contents >>

Navigation: Apollo VCL Components > Apollo VCL Component Reference > TApolloConnection > TApolloConnection Events >

OnLogin

Declaration

OnLogin(Sender: TObject; LoginAccepted: Boolean);

Description

Fires when the Login method is called. This is done implicitly when the connection is made to the server if the User and Password properties are used. The LoginAccepted parameter is True if the connection was made, False if not.

Delphi Example

procedure TForm1.ApolloConnection1Login(Sender: TObject; LoginAccepted: Boolean);

begin

if not LoginAccepted then

MessageDlg( 'Login denied!', mtInformation, [mbOK], 0 );

end;