帮忙写个小程序，DELPHI的
时间：2011-10-14
来源：互联网
delphi编写一个程序实现用Showmessage输出12345678910这个字符串，用for或者While循环
作者: lkdsjf 发布时间: 2011-10-14
Showmessage('12345678910');?
MessageBox(handle,'12345678910','提示',MB_ICONERROR + MB_OK);?
for i:=1 to 10 do
begin
Showmessage(inttostr(i));?
end;
MessageBox(handle,'12345678910','提示',MB_ICONERROR + MB_OK);?
for i:=1 to 10 do
begin
Showmessage(inttostr(i));?
end;
作者: funxu 发布时间: 2011-10-14
没事吧，为什么还循环
var
i:integer;
s:string;
begin
s := '12345678910';
for i := 1 to Length(s) do
begin
ShowMessage(s[i];
end;
end;
var
i:integer;
s:string;
begin
s := '12345678910';
for i := 1 to Length(s) do
begin
ShowMessage(s[i];
end;
end;
作者: bdmh 发布时间: 2011-10-14
LZ也没说清楚，楼上二位把几种写法都给出来了
作者: hongss 发布时间: 2011-10-14
牛比 v
作者: notebook800 发布时间: 2011-10-14
var s:string;//放在过程的begin 之前
for i:=1 to 10 do
begin
s := s + inttostr(i);
end;
Showmessage(s)
for i:=1 to 10 do
begin
s := s + inttostr(i);
end;
Showmessage(s)
作者: hqkaka 发布时间: 2011-10-14
这哥们分是不是太多了啊？
作者: jayqiang 发布时间: 2011-10-18
不知这哥们想表达什么意思
作者: qianchuan2010 发布时间: 2011-10-18
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读：74
-
如何安装mysql8.0
阅读：31
-
Word快速设置标题样式步骤详解
阅读：28
-
20+道必知必会的Vue面试题（附答案解析）
阅读：37
-
HTML如何制作表单
阅读：22
-
百词斩可以改天数吗？当然可以，4个步骤轻松修改天数！
阅读：31
-
ET文件格式和XLS格式文件之间如何转化？
阅读：24
-
react和vue的区别及优缺点是什么
阅读：121
-
支付宝人脸识别如何关闭?
阅读：21
-
腾讯微云怎么修改照片或视频备份路径?
阅读：28
