anchor.diff:  begin
     inherited Create(AOwner);
     FInternalMacroList := TIDEMacroList.Create;
  -  FCheckFont := fpgGetFont('DejaVu Sans-9');
   end;
   
   destructor TProjectOptionsForm.Destroy;
   begin
     FInternalMacroList.Free;
  -  FCheckFont.Free;
     inherited Destroy;
   end;
   
  
positive.code:   end;
  
    if ACol < 6 then
      grdUserMacros.Canvas.SetFont(FCheckFont)
    else
      grdUserMacros.Canvas.Setfont(grdUserMacros.Font);
  end;
  
negative.code:     FCellEdit: TfpgEdit;
      FFocusRect: TfpgRect;
      FLastGrid: TfpgStringGrid; // reference only
      // so we can get correct hints, but still undo with the Cancel button
      FInternalMacroList: TIDEMacroList;
      procedure btnShowCmdLineClicked(Sender: TObject);
  