Вниз
Скачать: 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.02 c
7-38574
alex_bf
2002-12-07 12:54
2003.02.13
Как запрятать файл?


1-38281
Dinn
2003-02-05 16:50
2003.02.13
линии с шириной >1 разными стилями


3-38044
qwerty2
2003-01-29 13:42
2003.02.13
Помогите одолеть Microsoft Access!


7-38578
fc
2002-12-09 22:10
2003.02.13
клавиатура


1-38164
SergeN
2003-02-04 15:39
2003.02.13
StringGrid




   Наверх