Source position: IdPOP3Server.pas line 247
type TIdPOP3ServerLogin = procedure(
aContext: TIdContext;
aServerContext: TIdPOP3ServerContext
) of object;