anchor.diff:  
   {@VFD_NEWFORM_IMPL}
   
  +procedure TProjectOptionsForm.CellEditExit(Sender: TObject);
  +begin
  +  FCellEdit.Visible := False;
  +end;
  +
   procedure TProjectOptionsForm.CellEditKeypressed(Sender: TObject;
     var KeyCode: word; var ShiftState: TShiftState; var Consumed: boolean);
   begin
  
positive.code:   begin
      FFocusRect := ARect;
    end;
  end;
  
  procedure TProjectOptionsForm.grdCompilerMakeOptionsClicked(Sender: TObject);
  var
    r, c: integer;
  begin
    r := grdCompilerMakeOptions.FocusRow;
    c := grdCompilerMakeOptions.FocusCol;
    if c < 6 then   // checkbox area
    begin
      if TfpgStringGrid(Sender).Cells[c, r] = '' then
        TfpgStringGrid(Sender).Cells[c, r] := 'x'
      else
        TfpgStringGrid(Sender).Cells[c, r] := '';
    end;
  
negative.code:   if c < 10 then   // checkbox area
    begin
      if TfpgStringGrid(Sender).Cells[c, r] = '' then
        TfpgStringGrid(Sender).Cells[c, r] := cCheck
      else
        TfpgStringGrid(Sender).Cells[c, r] := '';
    end;
  