Ｄｅｌｐｈｉ　ファイルのコピー

Ｄｅｌｐｈｉの関数には無いのでＷｉｎ３２ＡＰＩを使う
uses に　WINDOWS　を追加
//=============================================================================
// FC_SearchFile：指定されたファイルをコピーする
//…………………………………………………………………..
// FielFrom ：コピー元ファイル
// FielTo ：コピー先ファイル
// Mode ：上書き禁止モード（True:上書き禁止、False:上書き）
// ：
// result ：True:成功、False:失敗
//…………………………………………………………………..
// 注記 ：
// ：
//=============================================================================
function FC_FileCopy(FileFrom:string;FileTo:string;Mode:boolean):boolean;
begin
Result:=CopyFile(PChar(FileFrom),PChar(FileTo),Mode);
end;