Как копировать файлы?

Вопрос: Как копировать файлы?

Ответ : code: -------------------------------------------------------------------------------- BOOL CopyFile( LPCTSTR lpExistingFileName, // указатель на имя существующего файла LPCTSTR lpNewFileName, // указатель на имя файла куда копируешь BOOL bFailIfExists // флаг для случая если файл такой файл существует // если TRUE, и файл существует, тогда ничего, а если FALSE - // перезапишет в любом случае. ); -------------------------------------------------------------------------------- или так code: -------------------------------------------------------------------------------- int MoveFiles( AnsiString slSourceDir, AnsiString slTargetDir, bool toCopy = true ) { SHFILEOPSTRUCT sh; sh.fFlags = FOF_NOCONFIRMATION | FOF_SILENT | FOF_FILESONLY; sh.wFunc = toCopy ? FO_COPY : FO_MOVE; sh.pFrom = slSourceDir.c_str(); sh.pTo = slTargetDir.c_str(); sh.hNameMappings = NULL; sh.lpszProgressTitle = NULL; return SHFileOperation ( &sh ); } void __fastcall TForm1::Button1Click(TObject *Sender) { //copy all from program files if(!MoveFiles("c:\\program files\\*.*", "c:\\temp")) ShowMessage("Ok"); else ShowMessage("No"); //move only *.ini if(!MoveFiles("c:\\program files\\*.ini", "c:\\temp", false)) ShowMessage("Ok"); else ShowMessage("No"); } --------------------------------------------------------------------------------

Содержание раздела