2022企业服务(新型)提供商TOP150
全世界各行各业联合起来,internet一定要实现!

如何把文件删除到回收站中

2004-02-14 eNet&Ciweek

  例子如下:// Delphi 

  program del;

  uses ShellApi;

  { 利用ShellApi中: function SHFileOperation(const lpFileOp: TSHFileOpStruct): Integer; stdcall; }

  Var T:TSHFileOpStruct;

  P:String;

  begin

  P:='C:\Windows\System\EL_CONTROL.CPL';

  With T do

  Begin

  Wnd:=0;

  wFunc:=FO_DELETE;

  pFrom:=Pchar(P);

  fFlags:=FOF_ALLOWUNDO

  End;

  SHFileOperation(T);

  End.  

  注意:

  1. 给出文件的绝对路径名,否则可能不能恢复;

  2. MS的文档说对于多个文件,每个文件名必须被#)字符分隔,而整个字符串必须用两个#0结束

相关频道: eNews

您对本文或本站有任何意见,请在下方提交,谢谢!

投稿信箱:tougao@enet16.com