易语言添加发送到功能

指向文件路径 ＝ 注册表1.取易语言安装路径 () ＋ “\lib”
快捷方式文件名 ＝ 注册表1.取发送到路径 () ＋ “\lib（fne支持库）”
逻辑 ＝ 创建快捷方式 (快捷方式文件名, 指向文件路径, “《易语言代码大全》”, , )
' ──────────
指向文件路径 ＝ 注册表1.取易语言安装路径 () ＋ “\ecom”
快捷方式文件名 ＝ 注册表1.取发送到路径 () ＋ “\ecom（ec模块）”
输出调试文本 (快捷方式文件名, 指向文件路径)
逻辑 ＝ 创建快捷方式 (快捷方式文件名, 指向文件路径, “《易语言代码大全》”, , )
.如果 (逻辑 ＝ 真)
信息框 (“成功！……” ＋ #换行符 ＋ “对.ec文件，用鼠标右击→发送到→【ecom（ec模块）】” ＋ #换行符 ＋ “对.fne文件，用鼠标右击→发送到→【lib（fne支持库）】即可”, 0, “《易语言代码大全》”)
执行 (#浏览文件夹, 注册表1.取发送到路径 (), , )