FmtBcd.pas已经在Delphi XE2中进行了大量的修改。在我的一个项目中，我有一个case对两个Bcd值使用除法运算，但两个版本产生不同的结果。在最坏的情况下，Delphi XE2可能会抛出一个Bcd溢出错误。
示例：在Delphi XE2控制台应用程序中运行以下代码：
var A,B,C,D: TBcd;
begin
A := StrToBcd('1');
B := StrToBcd('3');
BcdDivide(A,C);
WriteLn(BcdToStr(C));
try
BcdMultiply(C,D);
WriteLn(BcdToStr(D));
except
on E: Exception do
WriteLn(E.Message);
end;
ReadLn;
end.
以上的输出将是：
0.333333333333333333333333333333333333333333333333333333333333333 BCD overflow
变量C包含具有63个小数位特异性的Bcd值。对变量C执行第二个BcdMultiply操作将导致Bcd溢出错误。
但是，在Delphi XE中运行相同的代码会产生以下结果，没有任何异常提示：
0.3333333333 0.11111111108888888889