请教-怎么把Tlist的值取出来?
请问--------如何把Tlist的值取出来?----------Tlist里用的是Add方法,存入很多条数据.现在我想把里面的数
请问--------如何把Tlist的值取出来?----------
Tlist里用的是Add方法,存入很多条数据.
现在我想把里面的数据取出来,可为什么下面的代码出错?
Function ListToTxt(sl:TList):string;
var
i:Integer;
str1:string;
begin
Result:='';
for I := 0 to sl.Count - 1 do
begin
str1:=str1+sl.string[i];
end;
Result:=str1;
end;
[解决办法]1.改用TStringList
2.改写如下：
Function ListToTxt(sl:TList):string;
var
i:Integer;
str1:string;
begin
Result:='';
str1:='';
for I := 0 to sl.Count - 1 do
begin
str1:=str1+sl[i];
end;
Result:=str1;
end;
