好急啊!---就是想不通?!!(23分)

衫菜

Unregistered / Unconfirmed
GUEST, unregistred user!
CT1是一个CLIENTDATASET;SRCF 是个FILESTREAM,TAA 是个 MEMORYSTREAM;
请看下面语句:
ct1.Close;
dp1.DataSet:=table1;
ct1.ProviderName:='dp1';
ct1.Open;
ct1.SaveToStream(taa);
ct1.Close;

srcf:=TFileStream.Create(savedialog1.FileName,fmOpenRead or fmShareExclusive);
srcf.Seek(0,soFromEnd);//往尾部添加资源
srcf.CopyFrom(taa,0);<--老说STREAM WRITE ERROR!!!
srcf.Free;
到底是怎么回事情啊!!!
 
你首先要知道copyfrom的用法。copyfrom好像有点相当于move的意思吧。所以 你最好不要用。
你可以用read,write等。
ct1.Close;
dp1.DataSet:=table1;
ct1.ProviderName:='dp1';
ct1.Open;
ct1.SaveToStream(taa);
ct1.Close;

srcf:=TFileStream.Create(savedialog1.FileName,fmOpenRead or fmShareExclusive);
srcf.Seek(0,soFromEnd);//往尾部添加资源
srcf.Write(taa,taa.Size);
srcf.Free;

 
接受答案了.
 
顶部