anchor.diff:    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;
   
  
positive.code:   ,frm_configuration
    ,frm_text
    ,NewViewConstantsUnit
    ;
  
  const
  
negative.code: 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);
  