Quellcode durchsuchen

Deal pay, Edit Mode, display format by digit

MaiXinRong vor 8 Jahren
Ursprung
Commit
e2bbb3d656
1 geänderte Dateien mit 0 neuen und 1 gelöschten Zeilen
  1. 0 1
      DataModules/DealPaymentDm.pas

+ 0 - 1
DataModules/DealPaymentDm.pas

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