Source position: IdTelnetServer.pas line 104
type TAuthenticationEvent = procedure(
AContext: TIdContext;
const AUsername: string;
const APassword: string;
var AAuthenticated: Boolean
) of object;