各位大侠,我新学习delphi,遇到一个问题,向大家请教。
我写的代码出现了一点问题,代码如下:
var i:integer;
begin
  for i:=0 to 9 do
  memo1.Lines.Insert(i,'第'+inttostr(i)+'行');
end;运行结果只有
第0行
第1行
然后就没了。我琢磨了很久都没找出问题所在,希望大侠们指点。

解决方案 »

  1.   

    你是不是只显示了两行的高度啊,改ScrollBars为ssboth,或者高度拉高看看。要不然跟踪看运行了几次。
      

  2.   

    因为第i行不存在,你这么干肯定不行,直接add不就行了
      

  3.   

    var i:integer;
    begin
      for i:=0 to 9 do
      memo1.Lines.add('第'+inttostr(i)+'行');
    end;
      

  4.   


    var i:integer;
    begin
      for i:=0 to 9 do
      memo1.Lines.add('第'+inttostr(i)+'行');
    end;
      

  5.   

    var 
     i:integer;  
    begin    
      for i:=0 to 9 do    
      memo1.Lines.add('第'+inttostr(i)+'行');  
    end;    
      

  6.   

    感谢各位大侠的帮助,也要向各位大侠道歉。因为,我发现我发错了问题。不是insert,是用strings[]。
    问题代码是这样的:
    begin
      for i:=0 to 9 do
      Memo1.Lines.Strings[i]:='第'+inttostr(i)+'行';
    end;