delphi怎么彻底删除一个件，而不是去回收站

delphi怎样彻底删除一个件，而不是去回收站？
如题，怎样实现？我用的是如下命令：
WinExec(PAnsiChar('cmd.exe /c del '+cdir+'acctmas\'+filename1),sw_hide)；
但是用DEL命令删除的文件，不是直接删除，而是到了回收站里面，我想直接删除，请问有什么好办法？
------解决方案--------------------
模拟shift ＋ delete,这个快捷键就是不经过回收站直接删除

------解决方案--------------------
cmd 的命令删除是直接删除的啊 回收站找不到啊..亲测.
------解决方案--------------------
不是有DeleteFile这个函数吗
------解决方案--------------------
BOOL WINAPI DeleteFile(
  __in  LPCTSTR lpFileName
);

------解决方案--------------------
DeleteFile还要去回收站删除一次？？？？？？？？？