// Quelle: Pfad + Dateiname(n) der Quelldatei(en)
// Ziel: Zielpfad
// Modus: 0 - Dateien kopieren, 1 - Dateien bewegen
if (!CopyMoveFiles("c:\\Temp*.*", "c:\\TempTest", 0))
ShowMessage("Ausführung erfolgreich !");
else
ShowMessage("Fehler aufgetreten !");
int TForm1::CopyMoveFiles(AnsiString slSourceDir, AnsiString slTargetDir, int Mode)
{
SHFILEOPSTRUCT sh;
ZeroMemory(&sh, sizeof(sh));
sh.hwnd = NULL;
sh.fFlags = FOF_NOCONFIRMATION | FOF_FILESONLY | FOF_NOCONFIRMMKDIR | FOF_SILENT;
if (Mode == 0)
sh.wFunc = FO_COPY; // Dateien kopieren
else
sh.wFunc = FO_MOVE; // Dateien bewegen
slSourceDir+="\0";
sh.pFrom = slSourceDir.c_str();
slTargetDir+="\0";
sh.pTo = slTargetDir.c_str();
sh.hNameMappings = NULL;
sh.lpszProgressTitle = NULL;
return SHFileOperation (&sh); // Aktion durchführen
}