Question

用易语言创建快捷方式

我想用易编译出软件，然后创建桌面快捷方式，但创建的是软件的图标，怎样才能创建桌面快捷方式图标和编译的软件图标不一样

Answer 1

使用F7编译 然后制作一个 解压程序 打包源文件 EXE 以及支持库 + 图标 。解压的过程中应该是 选择已打包的高锋图标为创建的快捷方式图标~

.版本 2

.子程序 系统_创建快捷方式, 逻辑型, 公开
.参数 lnk名称, 文本型
.参数 工作目录, 文本型, 可空
.参数 指向目标, 文本型
.参数 图标文件, 文本型, 可空
.参数 运行方式, 整数型, 可空, 1,常规方式，3,最大化，7,最小化哪拆
.参数 备注, 文本型, 可空
.参数 参数文本, 文本型, 可空
.参数 快捷键, 文本型, 可空
.局部变量 vbscrip, 对象
.局部变量 b, 对象

.如果真 (vbscrip.创建 (“WshShell”, “wshom.ocx”))
vbscrip ＝ vbscrip.对象型方法 (“CreateShortcut”, lnk名称)
.如果真 (vbscrip.是否为空 ())
返回 (假)
.如果真结束
.如果真 (vbscrip.写属性 (“TargetPath”, 指向目标))
vbscrip.写属性 (“WorkingDirectory”, 工作目录)
vbscrip.写属性 (“IconLocation”, 选择 (是否为空 (图标文件), 指向目标 ＋ “,0”, 图李念枣标文件))
vbscrip.写属性 (“WindowStyle”, 运行方式)
vbscrip.写属性 (“Description”, 备注)
vbscrip.写属性 (“Arguments”, 参数文本)
vbscrip.写属性 (“Hotkey”, 快捷键)
vbscrip ＝ vbscrip.对象型方法 (“Save”, )
返回 (真)
.如果真结束

参考一下我写的这 对象方式写的 创建快捷方式！

Answer 2

在 启动窗口 的 属性 里面添加 图标 就可以了。