Source position: IdIMAP4Server.pas line 244
type TIdIMAP4CommandBeforeEvent = procedure(
ASender: TIdCommandHandlers;
var AData: string;
AContext: TIdContext
) of object;