diff --git a/components/rx/trunk/rxdb/rxmemds.pas b/components/rx/trunk/rxdb/rxmemds.pas
index a474d0958..23d35ace4 100644
--- a/components/rx/trunk/rxdb/rxmemds.pas
+++ b/components/rx/trunk/rxdb/rxmemds.pas
@@ -360,7 +360,8 @@ begin
       ftBoolean: Result := SizeOf(WordBool);
       ftFloat: Result := SizeOf(Double);
       ftCurrency: Result := SizeOf(Double);
-      ftBCD: Result := 34;
+      //ftBCD: Result := 34;
+      ftBCD: Result:=SizeOf(currency);
       ftDate, ftTime: Result := SizeOf(Longint);
       ftDateTime: Result := SizeOf(TDateTime);
       ftBytes: Result := Size;