OnLogin(Sender: TObject)
Called after successfull login.