- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 如何用代码设置启动封面图片的文件 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=75863)
-- 发布时间：2015/10/16 6:42:00
-- 如何用代码设置启动封面图片的文件
如题。
此主题相关图片如下：未命名.bmp
[此贴子已经被作者于2015/10/16 6:51:06编辑过]
-- 发布时间：2015/10/16 6:46:00
--
Image
返回或设置窗口的背景图片。
可用GetImage函数从指定的图片文件获得图片，如果文件已经事先复制到管理项目的Images子目录下,则只需指定文件名即可,否则需要包括路径。
示例
Forms("窗口1").Image = GetImage(
"a.jpg")
类似这个功能
-- 发布时间：2015/10/16 7:54:00
--
在项目下放入1个jpg格式的图片,名字改成 Splash.jpg 就可以了
-- 发布时间：2015/10/16 8:49:00
--
这个文件夹下有几张图片，我请教的是如何用代码启用任意一张图片做为启动封面。
-- 发布时间：2015/10/16 9:13:00
--
以下是引用lihe60在2015/10/16 8:49:00的发言：
这个文件夹下有几张图片，我请教的是如何用代码启用任意一张图片做为启动封面。
关闭项目的时候，或者afterOPenProject的时候，任意拷贝一张图片替换，下次启动就不同了。
FileSys.CopyFile(ProjectPath & "splash.jpg", ApplicationPath & "splash.jpg", True)