Updated TemplatePro

danieleteti · Jan 30, 2025 · 74cda52 · 74cda52
1 parent 381a08b
commit 74cda52
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/sources/TemplatePro.pas b/sources/TemplatePro.pas
@@ -552,7 +552,7 @@ function TTProCompiledTemplate.GetDataSetFieldAsTValue(const aDataSet: TDataSet;
       Result := lField.AsDateTime;
     ftBoolean:
       Result := lField.AsBoolean;
-    ftFMTBcd:
+    ftFMTBcd, ftBcd:
       Result := TValue.From<TBCD>(lField.AsBCD);
   else
     Error('Invalid data type for field "%s": %s', [FieldName, TRttiEnumerationType.GetName<TFieldType>(lField.DataType)]);