Source position: fphttp.pp line 80
type TGetActionEvent = procedure(
Sender: TObject;
ARequest: TRequest;
var ActionName: string
) of object;