请教TFileStream?(5分)

X

xuekunli

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-15

• #1

请问：在
MyFileStream:=TFileStream.Create('./rec/'+FileName,fmCreate);
MyFileStream.Write(TmpStr[1],NumberBytes-24);中，
当TmpStr的长度较大时，如2048，就会出现eWriteError;1048则正确；
请问是什么问题？

 

A

amo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-16

• #2

你看看是否有内存管理上的问题，
下面是我的测试用例，
运行正常。

var
fs:Tfilestream;
i:integer;
buff:array[0..4096]of char;
begin
for i:=1 to 4096 do
buff[i-1]:=char(i);
fs:=TFilestream.Create('d:/test.dat',fmCreate);
fs.Write(buff,4096);
fs.Free;
end;

 

X

xiaoywh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-16

• #3

不要用你这句：MyFileStream.Write(TmpStr[1],NumberBytes-24);//这里面的变量含义？？
参amo的。。。。。

 

X

xuekunli

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-16

• #4

对不起，因上下文的关系。其中TmpStr为要写的string,NumberBytes-24为写进的字符数。
请多多指教！

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-19

• #5

接受答案了.