各位大侠,我新学习delphi,遇到一个问题,向大家请教。
我写的代码出现了一点问题,代码如下:
var i:integer;
begin
for i:=0 to 9 do
memo1.Lines.Insert(i,'第'+inttostr(i)+'行');
end;运行结果只有
第0行
第1行
然后就没了。我琢磨了很久都没找出问题所在,希望大侠们指点。
我写的代码出现了一点问题,代码如下:
var i:integer;
begin
for i:=0 to 9 do
memo1.Lines.Insert(i,'第'+inttostr(i)+'行');
end;运行结果只有
第0行
第1行
然后就没了。我琢磨了很久都没找出问题所在,希望大侠们指点。
解决方案 »
- Delphi 7自帶例子Pooler中的問題
- webservice 怎样增加一个unit?不能把所有函数都写在TSoapDataModule里面吧!!
- 求:Delphi开发答疑300问电子书
- 为什么按F5运行后代码报错定位不到真正的错误行?
- delphi通过dbe或ado对数据库操作的程序能做成dll在vfp中调用吗? 高分在线等待
- 今天参加一个讲座。。。。
- 求助:PsaveArray 的详解!!急急!!
- 在adoconnection中设置connectionstring访问access数据库,出现密码无效提示,内详!
- 怎样在 Delphi 中建立一个新的数据库
- 重赏之下必有勇夫!!!
- ???双硬盘如何读取硬盘号???
- 请教一个关于label.caption的问题。
begin
for i:=0 to 9 do
memo1.Lines.add('第'+inttostr(i)+'行');
end;
var i:integer;
begin
for i:=0 to 9 do
memo1.Lines.add('第'+inttostr(i)+'行');
end;
i:integer;
begin
for i:=0 to 9 do
memo1.Lines.add('第'+inttostr(i)+'行');
end;
问题代码是这样的:
begin
for i:=0 to 9 do
Memo1.Lines.Strings[i]:='第'+inttostr(i)+'行';
end;