anchor.diff:  
   procedure TMainForm.AfterCreate;
   begin
  +  {$IFDEF DEBUGSVR}
     SendMethodEnter('TMainForm.AfterCreate');
  +  {$ENDIF}
     {%region 'Auto-generated GUI code' -fold}
     {@VFD_BODY_BEGIN: MainForm}
     Name := 'MainForm';
  
positive.code:   inherited Create(AOwner);
    OnShow  := @FormShow;
    OnClose := @FormClose;
    SendDebug('TMainForm.Create');
  end;
  
  destructor TMainForm.Destroy;
  
negative.code:   FRecentFiles.ShowFullPath    := gINI.ReadBool('Options', 'ShowFullPath', True);
    FRecentFiles.LoadMRU;
  
    {$IFDEF DEBUGSVR}
    SendMethodExit('TMainForm.AfterCreate');
    {$ENDIF}
  end;
  
  
  