如何转换?变成百分制 %

怎么转换?变成百分制 %var a,b:integeredit1.Text:(a-b)/a[解决办法]Edit1.text :Format(%d%%,trunc

怎么转换?变成百分制 %
var a,b:integer;

edit1.Text:=(a-b)/a;

[解决办法]
Edit1.text :=Format('%d%%',trunc((a-b)/a*100))
[解决办法]
1L,要加中括号吧
Edit1.text :=Format('%d%%',[trunc((a-b)/a*100)]);