Привет!
Вот обычная фун-я перемещения файла в корзину.
| Код |
function FRecycle(const FileName: string; Wnd: HWND = 0): Boolean;
var
FileOp: TSHFileOpStruct;
begin
FillChar(FileOp, SizeOf(FileOp), 0);
if Wnd = 0 then
Wnd := Application.Handle;
FileOp.Wnd := Wnd;
FileOp.wFunc := FO_DELETE;
FileOp.pFrom := PAnsiChar(FileName);
FileOp.fFlags :=
//флаги определяющие параметры операции.
FOF_ALLOWUNDO //сохраняет информацию о возможной отмене операции.
or FOF_FILESONLY //выполняет операцию только для файлов, если задана маска файлов.
or FOF_NOCONFIRMATION //отвечает "Да для всех" на все вопросы.
or FOF_NOERRORUI //Не отображает пользовательский интерфейс при ошибке.
or FOF_SILENT; //не показывает прогресс бар отображающий ход операции.
//or FOF_MULTIDESTFILES //указывает, что pTo описывает несколько файлов (по одному на каждый файл источника) вместо одного каталога, куда должны быть помещены исходные файлы.
//FOF_NOCONFIRMMKDIR //не требует подтверждения создания нового каталога.
//or FOF_NO_CONNECTED_ELEMENTS //С версии 5.0. Не перемещает связанные файлы как группу. Только перемещает указанные файлы
//or FOF_NOCOPYSECURITYATTRIBS //С версии 4.71. Не копирует атрибуты безопасности файла.
//FOF_NORECURSION //Не поддерживает рекурсивные операции в подкаталогах, работает только в локальном каталоге.
//FOF_RENAMEONCOLLISION //присваивает файлу новое имя при операциях копирования, перемещения или переименования, если файл с указанным именем уже существует.
//or FOF_SIMPLEPROGRESS; //отображает окно прогресс бара, но не показывает имен файлов.
//FOF_WANTMAPPINGHANDLE {Определяет использование поля hNameMappings . Хендл объекта должен быть освобожден функцией SHFreeNameMappings . Она объявлена в ShellApi как процедура
//SHFreeNameMappings(hNameMappings: THandle);}
Result := (SHFileOperation(FileOp) = 0) and (not
FileOp.fAnyOperationsAborted);
end;
|
Категорически отказывается удалить файл
C:\Стас Михайлов\06 S. Mihailov - Luchshie pesni (2007)\02 Mama.mp3
Стоит его только переименовать
C:\Стас Михайлов\06 S. Mihailov - Luchshie pesni (2007)\02 Mama1.mp3
и всё встаёт на своё место.
Переименовываю обратно и снова нифига не работает 
Файл не занят ни какими процессами и стандартным методом удаляется (через explorer), хотя и тут функция ShellAPI
Аттрибуты тоже сняты. Что же это может быть?
зы длина строки и размер файла значения не меняют.
M
Rrader | Antony41, название темы должно кратко отражать ее суть. "Странная ошибка" - это не дело, у такой темы 100% в будущем будет странная судьба :) |
|
