anchor.diff:  procedure TMainForm.miConfigureClicked(Sender: TObject);
   begin
     ShowConfigForm;
  +  RichView.RichTextSettings.NormalFont := fpgGetFont(Settings.NormalFontDesc);
  +  RichView.RichTextSettings.FixedFont := fpgGetFont(Settings.FixedFontDesc);
   end;
   
   procedure TMainForm.miViewExpandAllClicked(Sender: TObject);
  
positive.code:   PageControl1.Width := gINI.ReadInteger('Options', 'SplitterLeft', 260);
    UpdateWindowPosition;
  
    Settings.NormalFont := fpgStyle.DefaultFont;
    Settings.FixedFont := fpgStyle.FixedFont;
    Settings.SearchDirectories := TStringList.Create;
  
    LogEvent(LogSettings, 'Loading settings');
    LoadSettings;
    CreateMRUMenuItems;
    ProcessCommandLineParams;
  
  
negative.code:   ,frm_configuration
    ,frm_text
    ,NewViewConstantsUnit
    ,CanvasFontManager
    ;
  
  const
  