Source position: IdFTPServer.pas line 687
type TOnAfterUserLoginEvent = procedure(
ASender: TIdFTPServerContext
) of object;