Как в Delphi при нажатии кнопки, когда хочешь удалить файл

[Maks oszone]

Дравствуйте! У меня такая пробла. При нажатии юзера на кнопку
выдается сообщение: "Вы действительно хотите удалить этот файл?"
Как сделать чтоб сообщение не появлялось и автоматом был ответ "ДА". (сразу удалялся файл.)
За ранее спасибо.
uses ShellApi;
Var
T:TSHFileOpStruct;
P:String;
procedure TForm1.Button1Click(Sender: TObject);
//function SHFileOperation(const lpFileOp: TSHFileOpStruct): Integer; stdcall;
begin
P:='C:\Program Files\xxx.exe';
 With T do
 Begin
   Wnd:=0;
   wFunc:=FO_DELETE;
   pFrom:=Pchar(P);
   fFlags:=FOF_ALLOWUNDO
 End;
 SHFileOperation(T);
end;

[Prisoner]

Читаем описание структуры SHFILEOPSTRUCT (в win32s.hlp, что идет в поставке Дельфи) и видим что в поле fFlags можно указать константу FOF_NOCONFIRMATION

[UZER]

Maks oszone
Есть там процедура DeleteFile(). Попробуй её

[Maks oszone]

Большое спасибо Prisoner
:oszone:

[RIKO]

>Есть там процедура DeleteFile(). Попробуй её<
функция DeleteFile никаких окон не выводит и удаляет
не в корзину .DeleteFile(FileName):boolean;