anchor.diff:      TabOrder := 1;
       OnClick := @grdCompilerMakeOptionsClicked;
       OnDrawCell := @grdCompilerMakeOptionsDrawCell;
  -    OnKeyPress :=@grdCompilerMakeOptionsKeyPressed;
  +    OnKeyPress := @grdCompilerMakeOptionsKeyPressed;
     end;
   
     grdCompilerDirs := TfpgStringGrid.Create(TabSheet2);
  
positive.code: 
  procedure TProjectOptionsForm.LoadSettings;
  var
    i: integer;
  begin
    edtMainFile.FileName := GProject.MainUnit;
    edtTargetFile.FileName := GProject.TargetFile;
  
negative.code:     FontDesc := '#Grid';
      HeaderFontDesc := '#GridHeader';
      Hint := '';
      RowCount := 0;
      RowSelect := False;
      TabOrder := 1;
      OnClick := @grdCompilerDirsClicked;
      OnDrawCell := @grdCompilerDirsDrawCell;
      OnKeyPress := @grdCompilerDirsKeyPressed;
    end;
  
    Label11 := TfpgLabel.Create(TabSheet2);
  