Source position: IdGlobalProtocols.pas line 357
type TStringEvent = procedure(
ASender: TComponent;
const AString: string
);