社区
Delphi
帖子详情
如何删除一个文件夹至回收站中?
nieyongxin
2000-09-14 04:42:00
如何删除一个文件夹至回收站中?
...全文
186
4
打赏
收藏
如何删除一个文件夹至回收站中?
如何删除一个文件夹至回收站中?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
4 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
Wingsun
2000-09-14
打赏
举报
回复
nieyongxin所写的代码中的AHandle,你可以使用当前的窗口句柄。如
RoRecycle(Form1.handle,'D:\temp.bmp');
nieyongxin
2000-09-14
打赏
举报
回复
Help对参数AHandle的解释是:
Handle of the dialog box to use to display information about the status of the operation.
但我将AHandle 设为Dialog Box的Handle时,一运行就出错,恳请朋友们指点。
Wingsun
2000-09-14
打赏
举报
回复
使用WindowsAPI SHFileOperation.具体的可以看MSDN的帮助。
nieyongxin
2000-09-14
打赏
举报
回复
我有现成的代码,但不知参数AHandle如何设定。
procedure ToRecycle(AHandle:THandle;AFileName:string);
var
SHFileOpStruct:TShFileOpStruct;
begin
with ShFileOpStruct do
begin
Wnd:=AHandle;
wFunc:=FO_DELETE;
pFrom:=PChar(AFileName);
fFlags:=FOF_ALLOWUNDO;
end;
SHFileOperation(SHFileOpStruct);
end;
123建立、打开、
删除
特殊字符
文件夹
工具,清空
回收站
因平时经常要遇到特殊字符名的
文件夹
,即
删除
不了,也打不开。还有就是有时
回收站
也无法清空,老提示清空错误,我就做了这个简单的工具来执行。以方便各位。 1.
删除
特殊字符的
文件夹
左键按住你要打开的
文件夹
拖动到程序的窗口上后放手即可
删除
,包括遇到桌面
回收站
无法清空的时候也可以,同样找到每
一个
盘符下的RECYCLER资料夹拖到程序的窗口也就可以
删除
了。正常情况下RECYCLER资料夹是隐藏的,你需要显示所有
文件夹
各文件。也可以在程序的
文件夹
名称栏输入"C:\RECYCLER"或者"D:\RECYCLER"或者"E:\RECYCLER".....,必须每
一个
盘符都
删除
。 2.建立特殊字符
文件夹
一样可以像"F:\ZJF..."格式后点建立特殊字符
文件夹
,大家可以多尝试一下。 3.打开特殊字符
文件夹
一样输入到
文件夹
名称栏"F:\ZJF..."格式后点打开打开特殊字符
文件夹
。
ubuntu强制清空
回收站
创建、
删除
文件及
文件夹
的方法.docx
ubuntu强制清空
回收站
创建、
删除
文件及
文件夹
的方法.docx
python自动化管理文件和
文件夹
本套课程主要以实用为主方面来讲解使用python代码来操作文件和
文件夹
,包括批量创建文件和
文件夹
,读取和写入文件,查询、搜索、遍历文件等操作。
pb9
删除
文件夹
及
文件夹
里面的全部文件
代码很简单,构思严谨,功能实用,还有修改
文件夹
属性的功能,可以显示
文件夹
里面的全部文件,物有所值。
给U盘加个
回收站
误删电脑硬盘
中
的文件可以在
回收站
中
找回来,但是U盘
中
的文件被误删后就只能用数据恢复软件了,那么可不可以给U盘加个
回收站
?答案是可以的,下面u大师就教大家方法。 新建
一个
文本文件,输入以下内容 @echooff mdd:\\U盘
回收站
2>nul for%%iin(%*)do( move/y%%ie:\\U盘
回收站
2>nul||( xcopy/e/s/k/o/q/y%%i';e\\U盘
回收站
\\%%~nxi\\';&&rd;/q/s%%i ) 将其另存为\"U盘
回收站
。bat\"的批处理文件,并放在\"C:\\DocumentsandSettings\\用户名\\SendTo\"
文件夹
中
。 现在选
中
待
删除
的文件,单击鼠标右键,选择\"发送到\"-\"U盘
回收站
\",即可将这些文件及
文件夹
移动到\"e:\\U盘
回收站
\"
文件夹
中
,当我们误删文件之后只要在该
文件夹
中
找到需要恢复的文件,单击右键,选择\"发送到\"-\"U盘盘符\"。以后我们只需要定时清空该
文件夹
就行了。
Delphi
5,392
社区成员
262,731
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章