.版本 2
.支持库 xplib
.支持库 edroptarget
.支持库 eAPI
.程序集 窗口程序集1
.程序集变量 a, 整数型
.子程序 __启动窗口_创建完毕
XP风格 (2)
拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ())
.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
编辑框1.内容 = 接收到的文件路径
.子程序 _按钮1_被单击
.计次循环首 (100, a)
提取资源文件图标 (编辑框1.内容, 0, 取运行目录 () + “\” + 到文本 (a) + “.ico”, a)
.计次循环尾 ()
.子程序 _编辑框1_内容被改变
按钮1.禁止 = 假
.子程序 _按钮2_被单击
' 删除文件 (“1.ico”)
这个源码的删除文件()命令只是删除1.ico一个文件
如何能达到删除一个文件夹种所有的ICO文件能?
大虾们 帮个忙