高考问答金来沅在韩国的地位:谁能帮我解释一下这代码
来源：百度文库 编辑：高考问答 时间：2024/04/29 23:46:15
TFileStream:文件流对象，用于操作文件，如读取或者生成本地文件。
以下代码用于把文件从一个地方拷到另外一个地方:
Procedure FileCopy( Const sourcefilename, targetfilename: String );
Var
S, T: TFileStream;
Begin
S := TFileStream.Create( sourcefilename, fmOpenRead );
try
T := TFileStream.Create( targetfilename,fmOpenWrite or fmCreate );//这里的 fmOpenWrite or fmCreate 是什么意思
try
T.CopyFrom(S, S.Size ) ;
finally
T.Free;
end;
finally
S.Free;
end;
End;
以下代码用于把文件从一个地方拷到另外一个地方:
Procedure FileCopy( Const sourcefilename, targetfilename: String );
Var
S, T: TFileStream;
Begin
S := TFileStream.Create( sourcefilename, fmOpenRead );
try
T := TFileStream.Create( targetfilename,fmOpenWrite or fmCreate );//这里的 fmOpenWrite or fmCreate 是什么意思
try
T.CopyFrom(S, S.Size ) ;
finally
T.Free;
end;
finally
S.Free;
end;
End;
fmOpenWrite，fmCreate 是库内预定义的整型常数，为Stream.Create()的一个参数。前者表示只写，若文件不存在就出错。后者表示创建，存在就以只写方式打开，否则创建后再以只写方式打开。
你可以把光标移到该单词下，按F1看帮助