TDecimal fix

Src/Data/Myc.Data.Decimal.pas

@@ -254,9 +254,7 @@ end;
 
 class operator TDecimal.Explicit(const A: TDecimal): Double;
 begin
-    var scale := A.GetScale;
-    var value := A.GetValue;
-    Result := value / PowersOf10[scale];
+    Result := A.GetValue / PowersOf10[A.GetScale];
 end;
 
 class function TDecimal.MaxValue(AScale: TScale): TDecimal;