TForm1 *Form1;
bool SHCopyFile(HWND ParentWindow, String &SourceFile, String &DestFile,bool Overwrite, bool ShowProgress)
{
SHFILEOPSTRUCT SHFOStruct; SHFOStruct.hwnd = ParentWindow;
SHFOStruct.wFunc = FO_COPY;
SHFOStruct.pFrom = SourceFile.c_str();
SHFOStruct.pTo = DestFile.c_str();
SHFOStruct.fFlags = FOF_ALLOWUNDO | FOF_NOCONFIRMATION | FOF_NOERRORUI;
if(!Overwrite)
SHFOStruct.fFlags = SHFOStruct.fFlags | FOF_RENAMEONCOLLISION;
if(!ShowProgress)
SHFOStruct.fFlags |= FOF_SILENT;
return !SHFileOperation(&SHFOStruct);
}
//************************************************************
void __fastcall TForm1::Button1Click(TObject *Sender)
{
SHCopyFile(Handle, "C:\\source.flv", "E:\\RES.flv", false, true);
}