如何取得＂回收站＂信息并操作＂回收站＂？

Question

1、如何取得回收站里的所有文件列表？包括文件大小、删除日期？
2、如何用程序实现回收站中某文件的“还原”、“删除”操作？ 

Answer 1

Windows没给出结构或者API，需要自己分析，给你一个清空回收站的例子
procedure EmptyRecycleBin;
{ proc to empty the recycle bin. }
const
SHERB_NOCONFIRMATION = $00000001;
SHERB_NOPROGRESSUI = $00000002;
SHERB_NOSOUND = $00000004;
type
TSHEmptyRecycleBin = function (Wnd: HWND;
LPCTSTR: PChar;
DWORD: Word): integer; stdcall;
var
SHEmptyRecycleBin: TSHEmptyRecycleBin;
LibHandle: THandle;
begin
LibHandle := LoadLibrary(PChar('Shell32.dll'));
if LibHandle <> 0 then
@SHEmptyRecycleBin := GetProcAddress(LibHandle, 'SHEmptyRecycleBinA')
else
begin
MessageDlg('Failed to load Shell32.dll.', mtError, [mbOK], 0);
Exit;
end;if @SHEmptyRecycleBin <> nil then
SHEmptyRecycleBin(Application.Handle,
'',
SHERB_NOCONFIRMATION or
SHERB_NOPROGRESSUI or
SHERB_NOSOUND);FreeLibrary(LibHandle);
@SHEmptyRecycleBin := nil;
end; 

Answer 2

我想要的不是清空啊
Google真是太伟大了，居然为博客自动提供了与Adsence关联的功能，自动就为博主开通了广告赚钱的途径，真太完美了。看到没有，就是上图中红框的那个功能“盈利”菜单！ （大家看上面的图，是Google博客的管理界面） 看我的Blog， Google在其上面开通了广告：http://d1soft.blogspot.com/ Google总不会骗人吧！