易语言怎么把图片资源库里的所有图加入到内存里

xunlu

7ian 发表于 2026-3-27 08:38
当然是把所有图片都加入 图片组啦

加进去然后呢，这样也用不了啊


.全局变量 图片数组, 字节集, , "0"

.子程序 加载资源图片

重定义数组 (图片数组, 真, )
加入成员 (图片数组, #图片1)

dm.FindPicMem (图片数组 [1], 0, 0, 1920, 1080, “000000”, 0.9, intX, intY)
.如果真 (intX ＞ 0 且 intY ＞ 0)
    程序_延时 (500, 0)
    dm.MoveTo (intX, intY)


错误(10042): 调用子程序“FindPicMem”时所传递的参数太少。


补充内容 (2026-3-27 10:15):
dm.FindPic (0, 0, 1920, 1080, 图片数组 [5], “000000”, 0.9, intX, intY)
也不行

xunlu

xunlu 发表于 2026-3-27 10:11
加进去然后呢，这样也用不了啊

.版本 2

.子程序 开始运行
.局部变量 ret, 整数型
.局部变量 x, 整数型
.局部变量 y, 整数型

时钟游戏计时.时钟周期 ＝ 1000
' ?? 这一行是 100% 正确写法，9个参数一个不少！
ret ＝ dm.FindPicMem (#图片4, 0, 0, 1920, 1080, “000000”, 0.9, x, y)

.如果真 (ret ＝ 1)
    信息框 (“找到图片！坐标：” ＋ 到文本 (x) ＋ “,” ＋ 到文本 (y), 0, , )
.如果真结束

.如果真 (ret ＝ 0)
    信息框 (“未找到”, 0, , )
.如果真结束

错误(10042): 调用子程序“FindPicMem”时所传递的参数太少。
还是不行

xunlu

我临时解决了，挨个图片转换一下也可以用

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
dm	大漠英文版
注册成功	整数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕
参数名	类 型	参考	可空	数组	备 注
ret	整数型
x	整数型
y	整数型
pic	文本型
ret1	文本型
图片	字节集

加载大漠 ()
dm.创建 ()
dm.Reg (“”, “”)
注册成功 ＝ dm.Reg (“”, “”)
调试输出 (“注册” ＋ 到文本 (注册成功))
dm.SetPath (取运行目录 ())

子程序名	返回值类型	公开	备 注
_按钮1_被单击

图片 ＝ #图片1
pic ＝ dm.AppendPicAddr (pic, 取变量数据地址 (图片), 取字节集长度 ( #图片1 ))
' 调试输出 (pic)
ret ＝ dm.FindPicMem (0, 0, 1920, 1080, pic, “000000”, 0.9, 0, x, y)
' 调试输出 (ret, x, y)
如果真 (x ＞ 0)
信息框 (“找到图片” ＋ 到文本 (x) ＋ 到文本 (y), 0, , )

子程序名	返回值类型	公开	备 注
_按钮2_被单击

图片 ＝ #图片2
pic ＝ dm.AppendPicAddr (pic, 取变量数据地址 (图片), 取字节集长度 ( #图片2 ))
' 调试输出 (pic)
ret ＝ dm.FindPicMem (0, 0, 1920, 1080, pic, “000000”, 0.9, 0, x, y)
' 调试输出 (ret, x, y)
如果真 (x ＞ 0)
信息框 (“找到图片” ＋ 到文本 (x) ＋ 到文本 (y), 0, , )

图片或图片组名称	内容	公开	备 注
图片1
图片2

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 dm, 大漠英文版<br /> .程序集变量 注册成功, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .参数 ret, 整数型<br /> .参数 x, 整数型<br /> .参数 y, 整数型<br /> .参数 pic, 文本型<br /> .参数 ret1, 文本型<br /> .参数 图片, 字节集<br /> <br /> 加载大漠 ()<br /> dm.创建 ()<br /> dm.Reg (“”, “”)<br /> 注册成功 ＝ dm.Reg (“”, “”)<br /> 调试输出 (“注册” ＋ 到文本 (注册成功))<br /> dm.SetPath (取运行目录 ())<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 图片 ＝ #图片1<br /> pic ＝ dm.AppendPicAddr (pic, 取变量数据地址 (图片), 取字节集长度 (#图片1))<br /> ' 调试输出 (pic)<br /> ret ＝ dm.FindPicMem (0, 0, 1920, 1080, pic, “000000”, 0.9, 0, x, y)<br /> ' 调试输出 (ret, x, y)<br /> .如果真 (x ＞ 0)<br />     信息框 (“找到图片” ＋ 到文本 (x) ＋ 到文本 (y), 0, , )<br /> .如果真结束<br /> <br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 图片 ＝ #图片2<br /> pic ＝ dm.AppendPicAddr (pic, 取变量数据地址 (图片), 取字节集长度 (#图片2))<br /> ' 调试输出 (pic)<br /> ret ＝ dm.FindPicMem (0, 0, 1920, 1080, pic, “000000”, 0.9, 0, x, y)<br /> ' 调试输出 (ret, x, y)<br /> .如果真 (x ＞ 0)<br />     信息框 (“找到图片” ＋ 到文本 (x) ＋ 到文本 (y), 0, , )<br /> <br /> <br /> .版本 2<br /> <br /> .图片 图片1<br /> .图片 图片2

补充内容 (2026-3-27 14:16):
这个弄错了

xunlu

资源表里面添加 图片1 图片2 图片3 我试了可以用，都没错

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
dm	大漠英文版
注册成功	整数型
ret	整数型
x	整数型
y	整数型
pic	文本型
ret1	文本型	0
图片	字节集

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

加载大漠 ()
dm.创建 ()
dm.Reg (“”, “”)
注册成功 ＝ dm.Reg (“”, “”)
调试输出 (“注册” ＋ 到文本 (注册成功))
dm.SetPath (取运行目录 ())

子程序名	返回值类型	公开	备 注
_按钮1_被单击

图片 ＝ #图片1
pic ＝ dm.AppendPicAddr (pic, 取变量数据地址 (图片), 取字节集长度 ( #图片1 ))
调试输出 (pic)
ret ＝ dm.FindPicMem (0, 0, 1920, 1080, pic, “000000”, 0.9, 0, x, y)
调试输出 (ret, x, y)
如果真 (x ＞ 0)
信息框 (“找到图片” ＋ 到文本 (x) ＋ 到文本 (y), 0, , )

子程序名	返回值类型	公开	备 注
_按钮2_被单击

图片 ＝ #图片2
pic ＝ dm.AppendPicAddr (pic, 取变量数据地址 (图片), 取字节集长度 ( #图片2 ))
调试输出 (pic)
ret ＝ dm.FindPicMem (0, 0, 1920, 1080, pic, “000000”, 0.9, 0, x, y)
调试输出 (ret, x, y)
如果真 (x ＞ 0)
信息框 (“找到图片” ＋ 到文本 (x) ＋ 到文本 (y), 0, , )

子程序名	返回值类型	公开	备 注
_按钮3_被单击

图片 ＝ #图片3
pic ＝ dm.AppendPicAddr (pic, 取变量数据地址 (图片), 取字节集长度 ( #图片3 ))
调试输出 (pic)
ret ＝ dm.FindPicMem (0, 0, 1920, 1080, pic, “000000”, 0.9, 0, x, y)
调试输出 (ret, x, y)
如果真 (x ＞ 0)
信息框 (“找到图片” ＋ 到文本 (x) ＋ 到文本 (y), 0, , )

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 dm, 大漠英文版<br /> .程序集变量 注册成功, 整数型<br /> .程序集变量 ret, 整数型<br /> .程序集变量 x, 整数型<br /> .程序集变量 y, 整数型<br /> .程序集变量 pic, 文本型<br /> .程序集变量 ret1, 文本型, , "0"<br /> .程序集变量 图片, 字节集<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 加载大漠 ()<br /> dm.创建 ()<br /> dm.Reg (“”, “”)<br /> 注册成功 ＝ dm.Reg (“”, “”)<br /> 调试输出 (“注册” ＋ 到文本 (注册成功))<br /> dm.SetPath (取运行目录 ())<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 图片 ＝ #图片1<br /> pic ＝ dm.AppendPicAddr (pic, 取变量数据地址 (图片), 取字节集长度 (#图片1))<br /> 调试输出 (pic)<br /> ret ＝ dm.FindPicMem (0, 0, 1920, 1080, pic, “000000”, 0.9, 0, x, y)<br /> 调试输出 (ret, x, y)<br /> .如果真 (x ＞ 0)<br />     信息框 (“找到图片” ＋ 到文本 (x) ＋ 到文本 (y), 0, , )<br /> .如果真结束<br /> <br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 图片 ＝ #图片2<br /> pic ＝ dm.AppendPicAddr (pic, 取变量数据地址 (图片), 取字节集长度 (#图片2))<br /> 调试输出 (pic)<br /> ret ＝ dm.FindPicMem (0, 0, 1920, 1080, pic, “000000”, 0.9, 0, x, y)<br /> 调试输出 (ret, x, y)<br /> .如果真 (x ＞ 0)<br />     信息框 (“找到图片” ＋ 到文本 (x) ＋ 到文本 (y), 0, , )<br /> .如果真结束<br /> <br /> <br /> .子程序 _按钮3_被单击<br /> <br /> 图片 ＝ #图片3<br /> pic ＝ dm.AppendPicAddr (pic, 取变量数据地址 (图片), 取字节集长度 (#图片3))<br /> 调试输出 (pic)<br /> ret ＝ dm.FindPicMem (0, 0, 1920, 1080, pic, “000000”, 0.9, 0, x, y)<br /> 调试输出 (ret, x, y)<br /> .如果真 (x ＞ 0)<br />     信息框 (“找到图片” ＋ 到文本 (x) ＋ 到文本 (y), 0, , )<br /> .如果真结束