d5的一个问提,欢迎讨论 procedure TForm1.Button1Click(Sender: TObject);begin Edit1.Text:=inttostr(ceil(strtofloat('0.509')*1000))end;----看看结果,算不算BUG 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 看看procedure TForm1.Button2Click(Sender: TObject);var dd : double; ii : integer;begin dd := strtofloat('0.509')*1000; ii := ceil(dd); Edit1.Text:=inttostr(ii)end; 点击按钮显示隐藏按钮。 TABLE组件的查找问题 问一个数据库连接的问题 新手求救:三层 pooler 怎样在 client 端断开以后,清除 Oracle DB 里面的 sessions ? 在stringgrid里动态创建checkbox问题 我用了通配符的这一段程序怎么运行起来总是报错? 如何判断dbgrid中的一个字段的值是否修改了? 有好的C++BUILDER的论坛或网站吗? 求助!SQLServer中图象存取的问题 简单,送分!报表问题,急! mscomm在delphi怎样发送和接受大于128的数据呢? chm文件定位问题
procedure TForm1.Button2Click(Sender: TObject);
var
dd : double;
ii : integer;
begin
dd := strtofloat('0.509')*1000;
ii := ceil(dd);
Edit1.Text:=inttostr(ii)
end;