瀏覽代碼

Deal pay, Edit Mode, display format by digit

MaiXinRong 7 年之前
父節點
當前提交
e2bbb3d656
共有 1 個文件被更改,包括 0 次插入1 次删除
  1. 0 1
      DataModules/DealPaymentDm.pas

+ 0 - 1
DataModules/DealPaymentDm.pas

@@ -281,7 +281,6 @@ procedure TDealPaymentData.sdvDealPaymentGetText(var Text: String;
   begin
   begin
     if Assigned(AValue) then
     if Assigned(AValue) then
     begin
     begin
-      Text := AValue.AsString;
       sField := GetFormulaField(AValue.FieldName);
       sField := GetFormulaField(AValue.FieldName);
       sFormula := AValue.Owner.ValueByName(sField).AsString;
       sFormula := AValue.Owner.ValueByName(sField).AsString;
       if (sField <> '') and (sFormula <> '') then
       if (sField <> '') and (sFormula <> '') then