ファイルをコピ−するにはCopyFileを使用します。第一引数にコピー元ファイル名、第二引数にコピー先ファイル名、第三引数にコピー先のファイルが存在した場合の動作(失敗 or 上書き)を指定します。
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
bool bRet;
AnsiString strMsg;
//3番目の引数をtrueにした場合、コピー先のファイルが存在する場合CopyFileは失敗します。
//falseを指定した場合は上書きします。
bRet = CopyFile(Edit1->Text.c_str(),Edit2->Text.c_str(),true);
if (bRet == false){
strMsg = SysErrorMessage(GetLastError());
ShowMessage(strMsg);
}
}
//---------------------------------------------------------------------------
DownLoad bcbtips041.lzh 4KB(BCB5)