procedure TForm1.BitBtn1Click(Sender: TObject);
var
a : real;
begin
a := strtofloat('9.3');
edit1.text := FloatToStr(a);
end;转来转去,还是9。3啊!
var
a : real;
begin
a := strtofloat('9.3');
edit1.text := FloatToStr(a);
end;转来转去,还是9。3啊!
解决方案 »
- Delphi 通过ADO 连接sybase12.0 关于事务的问题
- 串口通讯,获取字符串后,怎样发送到当前窗体的文本框中????
- 怎么样让五个edit框之合只能是100
- 局域网软件问题
- 一个日期类型的问题,请高手们帮帮忙,小弟在线等待!!!!
- 请教一个dcc32命令行参数的问题
- 关于帮助文件的问题,50分
- fastreport保存为excel的问题,分不够可以再加!!
- 关于数据库的小问题
- 请问在SQL SERVER 中如何取得一个字段的前几个字符?
- WinGate代理上网,设置后OICQ不能发送信息。怎样通过编程或已有软件结除这种设置
- delphi高手请进!!!!!windows自带的cards.dll如何使用?
Caption := FloatToStr(a);后检查标题。
a := strtofloat('9.3');
后增加一条使用变量A的语句,肯定就正确了:
showmessage(floattostr(a));
或者将A设为全局变量也没问题。可能这是Delphi编译器优化的结果。