J
jxh
Unregistered / Unconfirmed
GUEST, unregistred user!
我用动态数组和blockread读文件,读出来的都对,但最后无法将动态数组释放!
webcache:array of TWebCache;
SetLength(webcache,1000);
AssignFile(fp1,config.datapath+'webcache.dat')
try
Reset(fp1,1);
BlockRead(fp1,webcache[0],FileSize(fp1));
finally
fileclose(fp1);
end;
webcache:=nil;
debug在webcache:=nil;时报错
webcache:array of TWebCache;
SetLength(webcache,1000);
AssignFile(fp1,config.datapath+'webcache.dat')
try
Reset(fp1,1);
BlockRead(fp1,webcache[0],FileSize(fp1));
finally
fileclose(fp1);
end;
webcache:=nil;
debug在webcache:=nil;时报错