关于文件流的大小取值 ( 积分: 30 )

L

liuguilg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-02-01

• #1

if not dataset.Active then exit;
if dataset.RecordCount<1 then exit;

if FileExists('aa.txt') then
begin
DeleteFile('aa.txt');
dataset.Recordset.Save('aa.txt',0);
end
else
dataset.Recordset.Save('aa.txt',0);

ff:=TFileStream.Create('aa.txt',fmCreate);// fmopenread);
ShowMessage(IntToStr(ff.Size));

明明已经建立了aa.txt,而且有数据,怎么ff.Size=0了，

 

暗

暗夜中独舞

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-02-01

• #2

aa.txt是你在deletefile后重新建立的，怎么会有数据？

 

L

liuguilg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-02-01

• #3

dataset.Recordset.Save('aa.txt',0);
我这样向里面写入了数据，不行吗

 

R

Rainstorey

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-02-01

• #4

fmCreate->fmOpenRead

 

N

nicai_wgl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-02-01

• #5

ff:=TFileStream.Create('aa.txt',fmCreate or fmOpenRead);// fmopenread);

 

L

liuguilg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-02-01

• #6

ff:=TFileStream.Create('aa.txt',fmOpenRead);// fmopenread);
但后面 ff.size还是为0

 

N

nicai_wgl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-02-05

• #7

看看你的文件大小是不是0K，是不是没写进去东西。