赋于一个变量一个数据组


while not eof(ATextFile) do
begin
Readln(ATextFile,tl); //其实是ListBox1其中一行的值
nl:=Encode(tl);//加密 其实是ListBox1其中一行的值
//Writeln(ATextFile,nl);不能加入到这个位置，否则会报错
end;
CloseFile(ATextFile);


Writeln(ATextFile,nl);//我想将nl赋于一个数据组，也就是整个ListBox1中的数据，再写入ATextFile

CloseFile(ATextFile); 赋于一个变量一个数据组 加密
[解决办法]
可以试试文件流
[解决办法]
你可以试试用 DELPHI的变体变量 Variant 存放数组