madren1985的博客

在delphi 7 到delphi ex 由于string 变为 ansistring后，计算不正确，修改。