stringgrid 和DBGridEh这个冲突怎么处理？(20分)

procedure TfrmApp.strGridSelectCell(Sender: TObject;
ACol,
ARow: Integer;
var CanSelect: Boolean);
begin
if not(Acol in[2,3,6,11,12,13,15]) then
begin
N2.Enabled :=false;
strGrid.Options :=strGrid.Options-[goEditing];
end
else
begin
N2.Enabled :=true;
strGrid.Options:=strGrid.Options+[goEditing];
end;
end;
提示错误
[Error] uApp.pas(147): Incompatible types: 'Grids.TGridOption' and 'GridsEh.TGridOption'
[Error] uApp.pas(152): Incompatible types: 'Grids.TGridOption' and 'GridsEh.TGridOption'

注释其中一个引用单元。。。