![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
SHFileOperation [D7]
Lamer8 © (2005-05-24 20:24:00)Помогите избавится от диалогового окна подверждения удаления файла с помощью функции SHFileOperation.
with shf do
begin
wnd:=0;
wFunc:=FO_DELETE;
pFrom:=PChar(dir+'\'+Name+#0+#0);
pTo:=nil;
fFlags:=FOF_SILENT and FOF_ALLOWUNDO and FOF_NOCONFIRMATION;
//fAnyOperationsAborted:=false;
end;
if SHFileOperation(shf)=0 then
writeln(' - succesfully deleted!')
ОС: Windows Server 2003
Lamer8 (2005-05-24 21:22:00) [1]А, блин, точно, стормозил я опять:).
begin...end (2005-05-24 20:27:00) [2]> Lamer8 (24.05.05 20:24)
> fFlags:=FOF_SILENT and FOF_ALLOWUNDO and FOF_NOCONFIRMATION
fFlags := FOF_SILENT orFOF_ALLOWUNDO orFOF_NOCONFIRMATION