Source position: IdComponent.pas line 95
type TIdStatusEvent = procedure(
ASender: TObject;
const AStatus: TIdStatus;
const AStatusText: string
) of object;