瀏覽代碼

Bug #836 锁定列问题

MaiXinRong 9 年之前
父節點
當前提交
675086b437
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      DataModules/BillsCompileDm.pas

+ 1 - 1
DataModules/BillsCompileDm.pas

@@ -685,7 +685,7 @@ procedure TBillsCompileData.sdvBillsCompileSetText(var Text: String;
 
   function CheckValidData: Boolean;
   begin
-    Result := (AValue.AsString = Text);
+    Result := (AValue.AsString <> Text);
     if SameText(AColumn.FieldName, 'OrgQuantity') or
        SameText(AColumn.FieldName, 'OrgTotalPrice') or
        SameText(AColumn.FieldName, 'MisQuantity') or