我有一个代码,其变量为Single数据类型,但我想显示在消息框中。例如
VAR data:Single;
data:=0;
data:=5633.67+1290.965;
Msgbox('The sum of Fractional number is-:'+IntTostr(data),mbinformation,MB_OK);
答案 0 :(得分:3)
我现在至少可以想到两种选择。第一个是FloatToStr
函数,它是未记录的,或者是使用Format
函数的官方方式,这使您可以更灵活地指定所需的格式。以下是FloatToStr
函数的示例:
var
S: string;
Value: Single;
begin
Value := 1.2345;
S := FloatToStr(Value);
MsgBox('Value is: ' + S, mbInformation, MB_OK);
end;
这是一个使用Format
函数的示例。显示了如何以General
格式显示浮动值以及如何使用Fixed
格式显示具有2个小数位的相同值。有关格式的更多信息,请参阅Format
函数的Delphi帮助:
var
S: string;
Value: Single;
begin
Value := 1.2345;
S := Format('Value is: %g', [Value]);
MsgBox(S, mbInformation, MB_OK);
S := Format('Value is: %.2f', [Value]);
MsgBox(S, mbInformation, MB_OK);
end;