anchor.diff:    {$IFDEF DEBUGSVR}
     SendDebug('TMainForm.Create');
     {$ENDIF}
  +  FFileMonitor := TFileMonitor.CreateCustom;
  +  FFileMonitor.OnFileChanged  := @MonitoredFileChanged;
   end;
   
   destructor TMainForm.Destroy;
   begin
  +  FFileMonitor.Terminate;
  +  FFileMonitor.Free;
     FRegex.Free;
     FKeywordFont.Free;
     inherited Destroy;
  
positive.code: uses
    SysUtils, Classes, fpg_base, fpg_main, fpg_form, fpg_menu, fpg_panel,
    fpg_button, fpg_splitter, fpg_tab, fpg_memo, fpg_label, fpg_grid,
    fpg_tree, fpg_textedit, fpg_mru, synregexpr;
  
  type
  
  
negative.code:     end;
      ts.Realign;
      pcEditor.ActivePage := ts;
      FFileMonitor.AddFile(AFilename);
    end;
    ts.Hint := s;
    Result := ts;
  