Source position: sqldbrestschema.pp line 344
type TOnGetHTTPAllow = procedure(
Sender: TObject;
var aHTTPAllow
) of object;