Копирование с заменой файлов

← →
Wolferio © (2006-08-16 12:05) [0]

Добрый день.
ТАкая проблема: при копировании файлов из одной папки в другую, при первом копировании файлы копирует нормально, но при повторном копировании тех же файлов програма не копирует их с заменой а добавляет как Копия "Имя файла".
Как сделать что бы она заменяла существующие файли.
Вот кусок кода программы:
.........
FillChar( frombuf, Sizeof(frombuf), 0 );
FillChar( tobuf, Sizeof(tobuf), 0 );
StrPCopy( frombuf, с:\1\+"*.*" );
StrPCopy( tobuf, с:\2\);
With OpStruc DO
Begin
Wnd:= Handle;
wFunc:= FO_COPY;
pFrom:= @frombuf;
pTo:=@tobuf;
fFlags:= FOF_NOCONFIRMATION or FOF_RENAMEONCOLLISION;
fAnyOperationsAborted:= False;
hNameMappings:= Nil;
lpszProgressTitle:= Nil;
end;
ShFileOperation( OpStruc );

Заранее благодарен!

← →
clickmaker © (2006-08-16 12:08) [1]

убрать FOF_RENAMEONCOLLISION

← →
Wolferio © (2006-08-16 12:30) [2]

> clickmaker

Спасибо!

Еще вопрос!
Как мне убрать окно Копирования Windows и вставить свое, например в компонент Guage1.

Спасибо!

← →
Джо © (2006-08-16 12:33) [3]

> [2] Wolferio © (16.08.06 12:30)
> Еще вопрос!
> Как мне убрать окно Копирования Windows и вставить свое,
> например в компонент Guage1.

Лучше тогда использовать функцию CopyFileEx, она позволяет задать callback-процедуру.

> функцию CopyFileEx

но ее нет под 9х. Если твою прогу могут запустить и под ними, тогда самый универсальный способ с копированием блоками (чтение-запись в цикле)

Копирование с заменой файлов Найти похожие ветки