|
@@ -293,7 +293,7 @@ end;
|
|
|
procedure TBGLFrame.zaBGLGridCellCanEdit(Sender: TObject;
|
|
|
const ACoord: TPoint; var Allow: Boolean);
|
|
|
begin
|
|
|
- if _IsCloud and Allow and ACoord.Y < FBGLData.cdsBGLView.RecordCount then
|
|
|
+ if _IsCloud and Allow and (ACoord.Y <= FBGLData.cdsBGLView.RecordCount) then
|
|
|
Allow := FBGLData.GetBGLCanEdit(ACoord.Y - zgBGL.FixedRowCount);
|
|
|
end;
|
|
|
|