赋于一个变量一个数据组
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 存放数组