Question

delphi文件流的问题

delphi文件流有一处不懂，请指教。在线等！！！
var
Target,Source:TFileStream;
MyFileSize:integer;
begin
try
Source:=TFileStream.Create(SourceFile,fmOpenRead or fmShareExclusive);
Target:=TFileStream.Create(TargetFile,fmOpenWrite or fmShareExclusive);
try
Target.Seek(0,soFromEnd);
Target.CopyFrom(Source,0);
MyFileSize:=Source.Size+Sizeof(MyFileSize);
Target.WriteBuffer(MyFileSize,sizeof(MyFileSize));
finally
Target.Free;
Source.Free;
end;
问题一：
上面那段代码中，已经用Target.CopyFrom(Source,0) 将source中的所有数据拷贝到Target流中了，
为什么下面还有一句Target.WriteBuffer(MyFileSize,sizeof(MyFileSize));？这句话的意思不也是向
target流中写入数据吗？难道这次写入的数据和Target.CopyFrom写入的不同？请指点一下，谢谢。

问题二：
在这里MyFileSize和sizeof(MyFileSize)有什么区别？

Answer 1

1.在流的结尾写入一个长度标记（整个流＋这个整型的长度），有如文件尾。
2.sizeof(MyFileSize)=4.当然和MyFileSize不一样。