Преглед на файлове

* Patch from Ondrej Pokorny to fix issue #33710 (clear param value when not needed)

git-svn-id: trunk@38949 -
michael преди 7 години
родител
ревизия
fc2516d73f
променени са 1 файла, в които са добавени 1 реда и са изтрити 0 реда
  1. 1 0
      packages/fcl-db/src/base/dsparams.inc

+ 1 - 0
packages/fcl-db/src/base/dsparams.inc

@@ -840,6 +840,7 @@ Var
   VT : Integer;
 
 begin
+  if FDataType=AValue then Exit;
   FDataType:=AValue;
   VT:=FieldTypetoVariantMap[AValue];
   If (VT=varError) then