BlockWrite的问题,出错I/O error 1784 ( 积分: 100 )

  • 主题发起人 主题发起人 zhangkan
  • 开始时间 开始时间
Z

zhangkan

Unregistered / Unconfirmed
GUEST, unregistred user!
我的类型比较大,有300多字节,我使用BlockWrite时,发现Count参数只能给42个字节,多了就报I/O error 1784错误.请问怎么处理? (50分)
BlockWrite(f,myRec,SizeOf(myRec));
另:我想将我的record数组写到文件中,(record比较复杂,record中还有record,并且还有数组).并再顺利的读取出来.我试了,但总是有些问题,很是奇怪.(50分)
请哪些大大帮忙一下,解决这个问题,立即给分!谢谢!
 
rewrite(f,1);
 
tseug兄,我试了,提示too many actual parameters,我是用的D7。另外,能否两个问题都看看?最好一并解决了,呵呵
 
var
wSourceFile,wintentFile: String;
sourcef,intentf:file;
nRead,nWrite:integer;
buff:array [1..1024] of char;

begin
......
assignfile(sourcef,wSourceFile);
reset(sourcef,1);
assignfile(intentf,wintentFile);
rewrite(intentf,1);
repeat
blockread(sourcef,buff,sizeof(buff),nRead);
blockwrite(intentf,buff,sizeof(buff),nwrite);
until (nRead = 0) or (nWrite <> nRead);
closefile(sourcef);
closefile(intentf);

读写文件我用块是这样做的,你参考一下吧。。。
 
多谢二位
 

Similar threads

回复
0
查看
1K
不得闲
回复
0
查看
874
不得闲
S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
913
SUNSTONE的Delphi笔记
S
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
后退
顶部