求助。构建FloatToStrF函数。
我打算自己构建一个floattostr函数，就把floattostr从SysUtils里面扣了出来，但是编译有一个警告
[Warning] SysUtils.pas(13384): Symbol 'EStackOverflow' is deprecated
并且得出得结果不正确，我把源码发上来 求修复方法。。。。
源码下载地址 http://115.com/file/e7lfzmqp
[解决办法]
这里改成这样：
if MemInfo.dwTotalPhys > 1073741824 then AllMem := FloatToStrF(MemInfo.dwTotalPhys / 1073741824, ffFixed , 18, 0)+' GB';
.
.
.
.
if MemInfo.dwAvailPhys > 1073741824 then DoMen := FloatToStrF(MemInfo.dwAvailPhys / 1073741824, ffFixed , 18, 0)+' GB';
再看看！
