怎么格式化实数

如何格式化实数
我想格式化输出一个实数只带2位小数，怎么做？

[解决办法]

Delphi(Pascal) code

Text := Format('%.2f', [1.23456]);
[解决办法]
formatfloat('0.00', real);
[解决办法]
Delphi(Pascal) code
procedure TForm1.Button2Click(Sender: TObject);begin edit1.Text :=formatfloat(',####.##', 1212211.26587);end;
[解决办法]
var
 V: Double;
begin
 if V < 0 then
   V:= Trunc(X * 100- 0.5) / 100
 else
   V:= Trunc(X * 100+ 0.5) / 100;
end;