Вниз
Скачать: CL | DM;

Ещё раз о корзине.   Найти похожие ветки 

 
Xmen   (2002-12-29 13:30) [0]

У меня традиционный вопрос. Как можно удалить файл в корзину.
Я много слышал и нашел но не получился. А вы немогли бы посоветат как мне написать код Удаления файла в корзину.
Я восползовался таким кодом из FAQ.
function DeleteFileWithUndo( sFileName : string ) : boolean;
var fos : TSHFileOpStruct;
begin
sFileName:= sFileName+#0;
FillChar( fos, SizeOf( fos ), 0 );
with fos do begin
wFunc := FO_DELETE;
pFrom := PChar( sFileName );
fFlags := FOF_ALLOWUNDO ;
end;
Result := ( 0 = ShFileOperation( fos ) );
end;

здесь sFileName имя файла Но это функция удаляет файл без следа.
Как можно удалит файл в корзину и можно ли с обычним путём (без ShellApi)


 
Evgeniy_k   (2002-12-29 13:42) [1]

Скачай Helper с http://www.your-helper.narod.ru/ Там про это написано и еще куча всего (107 шт.) Полезная вещь. Еще советую скачать Delphi Hi Tech.


 
Юрий Зотов ©   (2002-12-29 14:28) [2]

Проверьте, что sFileName содержит ПОЛНЫЙ путь и имя файла.


 
Suntechnic ©   (2002-12-30 02:35) [3]

Как можно удалит файл в корзину и можно ли с обычним путём (без ShellApi)

Вообще то странно звучит, особенно если учесть что "корзина" это и есть виртуальный объект той самой Shell и без неё существовать ну никак не может. Так что не изобретали бы вы лучше велосипед.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c
3-38141
Ag2002
2003-01-28 17:08
2003.02.13
Пустая дата


14-38456
Barman
2003-01-30 12:37
2003.02.13
Delphi и С++Builder


14-38480
OlProgrammer
2003-01-23 14:58
2003.02.13
Update fo Delphi 7


3-38048
keeper
2003-01-29 10:59
2003.02.13
Index XXXX is not a valid name


1-38165
Ренат
2003-02-04 15:21
2003.02.13
SpeedButton




   Наверх