大
大苹果
Unregistered / Unconfirmed
GUEST, unregistred user!
俺的程序:
assignfile(F,filename);
reset(F);
While not Eof(F) Do
Begin
read(F,myrecord);
showmessage(Myrecord.code+ Myrecord.currtime)
end;
closefile(F);
F 是个记录型的文件,每个record 的currtime是不断变化! 但code是不会变化的!
Ex.
我第一次读出的为(code+ 11:20:13), 第二次就应该发生变化(code+11:40:14)
我今天早上编译这个程序正确!下午就出现问题啦!
两次(或者更多次)读出的数据总是相同
assignfile(F,filename);
reset(F);
While not Eof(F) Do
Begin
read(F,myrecord);
showmessage(Myrecord.code+ Myrecord.currtime)
end;
closefile(F);
F 是个记录型的文件,每个record 的currtime是不断变化! 但code是不会变化的!
Ex.
我第一次读出的为(code+ 11:20:13), 第二次就应该发生变化(code+11:40:14)
我今天早上编译这个程序正确!下午就出现问题啦!
两次(或者更多次)读出的数据总是相同