Source position: sqldbrestschema.pp line 252
type TSQLDBRestAllowResourceEvent = procedure(
aSender: TObject;
aContext: TBaseRestContext;
var allowResource: Boolean
) of object;