关于 formatfloat 函数的问题，百思不得其解，求高手解答。

Question

var str:string;
  
  str:=formatfloat('000.00',single);  // single = 99.01   writeln(file,str + ‘ ，元’);  运行结果：输出  99.01 ， 元， 但在一个特别的机器上缺输出为：  99，01 ，元 。  为什么？？？

Answer 1

不可能吧
formatfloat('#,##0.00',strtofloat('123456789.12'));
结果为：123,456,789.12

Answer 2

不可能吧
formatfloat('#,##0.00',strtofloat('123456789.12'));
结果为：123,456,789.12

Answer 3

procedure TForm1.Button1Click(Sender: TObject);
var str:string;
begin
  str:=formatfloat('000.00',99.01);  // single = 99.01  showmessage(str + '元');end;
------------------------------------------------------------
以上代码输出为：099.01

Answer 4

操作系统中->控制面板->区域->货币设置看看