新手的一个简单的问题,万分急切!高分相送!

按文件流方式读呀：
procedure TForm1.Button2Click(Sender: TObject);
Var
S, T: TFileStream; {文件流}
SourceFileName,DestFileName:String;{源文件和目的文件名}
Begin
S := TFileStream.Create( SourceFileName, fmOpenRead );
try
T := TFileStream.Create( DestFileName,fmOpenWrite or fmCreate );
try
T.CopyFrom(S, S.Size ) ;
finally
T.Free;
end;

finally
S.Free;
end; End;
这是流文件拷贝的代码，你改一改就行了!

楼上的，你还没告诉我怎么样从二进制文件到oleVariant变量。
读到char数组中的是一些类似于：
buffer=('M','Z',#184,#3,#0,#0.....)其中只有像前面的两个'M','Z'能放到oleVariant变量中，其余的放不进去!

學努中.