anchor.diff:      if Assigned(FRazorEngine) then
       begin
         FRazorEngine.OnObjectForPath := OnObjectForPathHandler;
  +      FRazorEngine.OnScaffolding := OnScaffoldingHandler;
         FRazorEngine.OnPageError := OnPageErrorHandler;
   
         FRazorEngine.AddToDictionary('token', Token, False);
  
positive.code:   TOnLangProc = reference to procedure (const AFieldName: string; var AReplaceText: string);
    TOnValueProc = reference to procedure (const ObjectName: string; const FieldName: string; var ReplaceText: string);
    TOnObjectForPathProc = reference to procedure (ExecData: TRazorExecData);
  
    TMARSDelphiRazor = class
    private
  
negative.code:     function GetTemplatesFolder: string; virtual;
  
      procedure OnObjectForPathHandler(Sender: TObject; ExecData: TRazorExecData); virtual;
      procedure OnScaffoldingHandler(Sender: TObject; const qualifClassName: string;
        var ReplaceText: string); virtual;
      procedure OnPageErrorHandler(Sender: TObject; pageInfo: TPageInfo); virtual;
      procedure OnLangHandler(Sender: TObject; const FieldName: string; var ReplaceText: string); virtual;
      procedure OnValueHandler(Sender: TObject; const ObjectName: string;
  