TStringList的Insert如何用,总是说边界错?

Question

TStringList的Insert如何用,总是说边界错?

Answer 1

var
  TempStringList:TStringList;
begin
TempStringList:=TStringList.Create();
TempStringList.Insert(20,'sdfsdff');
TempStringList.Insert(11,'sdfsawrdff');
TempStringList.Insert(1,'12321');
end;

Answer 2

因为这个时候你的StringList刚Create，哪里有20啊你在前面连续加20个TempStringList.Add('1');就发现没有错误了。

Answer 3

var
  TempStringList: TStringList;
  i: integer;
begin
  TempStringList := TStringList.Create();
  for i:=0 to 19 do
    TempStringList.Add(IntToStr(i));
  TempStringList.Insert(20,'sdfsdff');
  TempStringList.Insert(11,'sdfsawrdff');
  TempStringList.Insert(1,'12321');
end;

Answer 4

新Create的TStringList最好使用Add方法,Insert(0,'str'); 也是可以的.