提取图标提取不到东西呀 为啥嘞

.版本 2
.支持库 edroptarget
.支持库 eAPI
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ())

.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
编辑框1.内容 ＝ 接收到的文件路径

.子程序 _编辑框1_内容被改变
按钮1.禁止 ＝ 假
.子程序 _按钮1_被单击
.计次循环首 (100, a)
    提取资源文件图标 (编辑框1.内容, 0, 取当前目录 () ＋ 到文本 (a) ＋ “\1.ICO”, a)
.计次循环尾 ()
信息框 (“已提取” ＋ 到文本 (a), 0, “提取的很成功”, )
' 提取资源文件图标 (编辑框1.内容, 0, 取当前目录 () ＋ “\1.ico”, )

.子程序 _按钮2_被单击
删除文件 (取当前目录 () ＋ 到文本 (a) ＋ “\1.ICO ”)
信息框 (“已删除” ＋ 到文本 (a), 0, “没有了呀”, )