插入-资源-图片或图片组-然后双击内容下面空白的地方
这里选择所有文件(*.*),就可以选择你要的EXE或者zip文件。
然后点这个
这样就可以了,要释放出来就一行代码,比如是EXE文件,那就是
写到文件(取运行目录()+“\文件名.exe”,#图片1)
这样就释放出来了,要运行也是一行代码
运行(取运行目录()+“\文件名.exe”)
首先添加一个ZIP压缩,压缩文件就是:ZIP压缩1.压缩
(“压缩的文件”,
“压缩的新文件名”)
假如压缩的文件是C:\1.exe,想添加到C:\1.zip代码就是这样:
ZIP压缩1.压缩
(“C:\1.exe”,
“C:\1.zip”)
你可以把图片的名称改为数字的,如:1.jpg然后用:
b=取随机数(,)
图片框.图片
=
读入文件("d:\image\”+到文本(b)+“.jpg")
这样。图片框就可以换图片了。
或者在你的程序加一个列表框。然后把所有的图片名称写到一个文本文件里,列表框通过读取这个文本文件把这些图片的名称加入到列表框里,然后写代码
b=列表框.现行选中项
图片框.图片
=
读入文件("d:\image\”+b)
如果你写到那个文本文件里的图片都是有路径的。就不用担心图片是在那个目录了。直接写代码
b=列表框.现行选中项
图片框.图片
=
读入文件(b)
你可以把图片都放到你程序里的图片资源里。或者把你的图片都压缩到一个zip的压缩包里,然后放到图片资源里,再在窗口放个
zip压缩
组件,在启动窗口创建完毕的程序里写:比如你放到图片资源里的那个压缩包的名字是
图片1
写到文件(“d:\image.zip”,#图片1)
zip压缩.解压(“d:\image.zip”,“d:\image”)
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)