谁能帮忙看看这个Delphi程序哪里错，怎么运行不了？

2024-12-26 10:00:31

推荐回答（2个）

回答1：

procedure TForm1.Button1Click(Sender: TObject);
var
sum,i:integer;//错误1:没有定义变量
begin
sum:=0;
i:=1;

repeat
sum:=sum+i;
i:=i+1;
until i >100;

showmessage(inttostr(sum));//错误2:inttostr函数没有参数
end;

回答2：

下面一行有错，参数不对：
showmessage(inttostr);

应该修改为：
showmessage(inttostr(sum));

最新问答

怎么办?请帮帮我,这算强迫症吗?

生产一批零件，甲单独完成要20小时，乙的工效是甲的80%。两人合作，几小时生产这批零件的 9⼀10？

看图作文生机100字数

我总是先做家庭作业。用英语说。

求救啊！！！华硕P43S笔记本玩英雄联盟CPU温度超过80，都不敢玩了

什么是哲学上的物质？

三校和万国，非法本选哪一个好？

我的主板诊断卡提示02，怎么修啊？

我要退游网恋男朋友说他哭了，后来见面时还有点冷漠，你说他是什么意思啊？

房屋买卖跳过中介搞私交有何风险