Source position: httpdefs.pp line 718
type TResponseEvent = procedure(
Sender: TObject;
AResponse: TResponse
) of object;