易语言怎么取快捷方式的源文件路径?
推荐于2016-05-17
展开全部
参考实例如下:
.版本乱运 2
.支持库 shell
.支持库 spec
.子程序 _按钮1_被单击
.局部变量 数据, 字节集
.局部变量 list长度, 整数型
.局部变量 文件信息位置, 整数型
.局部变量 文件位置偏移, 整数型
.局部变量 目标路径, 文本型
通用对话框1.文件名 = “”
通用对话框1.过滤握陪卖器 = “*.lnk|*.lnk”
通用对话框1.初始目录 =段逗 取特定目录 (#系统桌面)
通用对话框1.打开 ()
.如果真 (通用对话框1.文件名 = “”)
返回 ()
.如果真结束
调试输出 (通用对话框1.文件名)
标签2.标题 = 通用对话框1.文件名
数据 = 读入文件 (通用对话框1.文件名)
.如果真 (数据 = { })
调试输出 (“读入文件数据失败”)
返回 ()
.如果真结束
list长度 = 取字节集数据 (数据, #短整数型, 77)
调试输出 (list长度)
文件信息位置 = list长度 + 78
调试输出 (文件信息位置)
文件位置偏移 = 取字节集数据 (数据, #整数型, 文件信息位置 + 17)
调试输出 (文件位置偏移)
目标路径 = 取字节集数据 (数据, #文本型, 文件信息位置 + 文件位置偏移 + 1)
调试输出 (目标路径)
标签1.标题 = 目标路径
.版本乱运 2
.支持库 shell
.支持库 spec
.子程序 _按钮1_被单击
.局部变量 数据, 字节集
.局部变量 list长度, 整数型
.局部变量 文件信息位置, 整数型
.局部变量 文件位置偏移, 整数型
.局部变量 目标路径, 文本型
通用对话框1.文件名 = “”
通用对话框1.过滤握陪卖器 = “*.lnk|*.lnk”
通用对话框1.初始目录 =段逗 取特定目录 (#系统桌面)
通用对话框1.打开 ()
.如果真 (通用对话框1.文件名 = “”)
返回 ()
.如果真结束
调试输出 (通用对话框1.文件名)
标签2.标题 = 通用对话框1.文件名
数据 = 读入文件 (通用对话框1.文件名)
.如果真 (数据 = { })
调试输出 (“读入文件数据失败”)
返回 ()
.如果真结束
list长度 = 取字节集数据 (数据, #短整数型, 77)
调试输出 (list长度)
文件信息位置 = list长度 + 78
调试输出 (文件信息位置)
文件位置偏移 = 取字节集数据 (数据, #整数型, 文件信息位置 + 17)
调试输出 (文件位置偏移)
目标路径 = 取字节集数据 (数据, #文本型, 文件信息位置 + 文件位置偏移 + 1)
调试输出 (目标路径)
标签1.标题 = 目标路径
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询