浏览代码

Merge branch 'master' of http://192.168.1.12:3000/maixinrong/measure

builder 8 年之前
父节点
当前提交
efc1937778
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      Frames/ZJJLFme.pas

+ 1 - 1
Frames/ZJJLFme.pas

@@ -306,7 +306,7 @@ var
   sFieldName: string;
 begin
   sFieldName := RowFields[TRowIndex(ACoord.Y)];
-  Allow := (sFieldName <> '') and Assigned(saZJJL.DataView.Current);
+  Allow := (not FDataReadOnly) and (sFieldName <> '') and Assigned(saZJJL.DataView.Current);
 end;
 
 end.