江湖告急:如何实现 3/4=75% 俺想实现3/4=75%,把75%存入数据表中。但是我不会实现,请大家帮帮忙,怎样来取得两个整数相除后的百分数???“%” 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var a :integer; str:String;a = 3; str = FormatFlat('#.##',(a as float)/4)*100) + '%' (='75%') procedure TForm1.Button1Click(Sender: TObject);var a :integer; str:String;begin a := (100*3) div 4; Str := IntToStr(a)+'%'; Self.Caption := Str;end; 请问,我打印发票时到最末行,打印机总认为我缺纸,不能打印最后一行,怎么解决呢?60分在线急等,谢谢!!! 图片特效的控件有吗?(适用于Delphi 6.0下的) 请问这个页面是怎么实现的? 关于字符串问题: 谁能告诉我delphi7怎么通过mysql api访问mysql数据库?给点提示也行(API) 关于Image的图片切换问题! 关于数据库结构 怎样实现当点击dbgrid中某一行时让整个这一行都高亮显示 如何设计数据库的登录验证 你们的Delphi6都不缺Proxies.dcu? 大家好 高分求救:File not found: 'MSScriptControl_TLB.dcu'
a :integer;
str:String;
a = 3; str = FormatFlat('#.##',(a as float)/4)*100) + '%' (='75%')
var
a :integer;
str:String;
begin
a := (100*3) div 4;
Str := IntToStr(a)+'%';
Self.Caption := Str;
end;