以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  自动替换狐狸头  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=169720)

--  作者:15666282205
--  发布时间:2021/6/28 10:03:00
--  自动替换狐狸头
老师,我用下面的代码实现了更换左上角狐狸头的目的,但是前提是要把文件夹放到D盘根目录,给其他人安装时有点麻烦。能否实现自动寻找项目文件夹并替换呢?
basemainform.icon = New Icon("D:\\Publish\\foxtable.ico")

--  作者:有点蓝
--  发布时间:2021/6/28 10:04:00
--  
图标文件放到项目目录里,发布的时候添加到附件中

basemainform.icon = New Icon(projectpath & "foxtable.ico")
[此贴子已经被作者于2021/6/28 10:04:40编辑过]

--  作者:15666282205
--  发布时间:2021/6/28 10:28:00
--  
老师,这个代码好像提示寻找安装源程序的目录,实际上是应该找发布后的项目文件夹,比如我把发布后的PUBLISH文件夹发给其他人,在其他人的电脑上运行,请您指点。
--  作者:15666282205
--  发布时间:2021/6/28 10:45:00
--  
老师,好像可以了,谢谢