pl 

OnLogin (TCustomConnection)