Source position: vsvisualserverbase.pas line 115
type TOnError = procedure(
Sender: TObject;
Error: Integer;
ErrorMsg: string;
IPInfo: TIPInfo
) of object;