超级列表框插入图片问题

枫槿

这是运行效果     下面的是源码 有哥哥知道为啥从9往后就都不显示了吗？

  

num ＝ 176
宽高 ＝ 80
超级列表框1.全部删除 ()
图片框1.高度 ＝ 宽高
图片框1.宽度 ＝ 宽高
图片组 ＝ 建空图片组 (宽高, 宽高)
画板1.宽度 ＝ 10 × 宽高
画板1.高度 ＝ 四舍五入 (num ÷ 10, 0) × 宽高
调试输出 (画板1.高度)
画板1.刷新显示 ()
a ＝ 1
b ＝ 1
计次循环首 (num, i)
画板1.刷子颜色 ＝ 取随机数 (1, 65535)
判断 (a ＞ 10)
a ＝ 1
b ＝ b ＋ 1
画板1.填充矩形 ( (a － 1) × 宽高, (b － 1) × 宽高, a × 宽高, b × 宽高)
画板1.填充矩形 ( (a － 1) × 宽高, (b － 1) × 宽高, a × 宽高, b × 宽高)

画板1.定位写出 ( (a － 1) × 宽高 ＋ 10, (b － 1) × 宽高 ＋ 10, 到文本 (i))
a ＝ a ＋ 1
处理事件 ()
计次循环尾 ()
加入图片 (图片组, 画板1.取图片 (, ), 0)
超级列表框1.图片组 ＝ 图片组
计次循环首 (num, i)
超级列表框1.插入表项 (, 到文本 (i), i － 1, , , )
处理事件 ()
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一
iext2	扩展界面支持库二
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> .支持库 iext2<br /> .支持库 spec<br /> <br /> num ＝ 176<br /> 宽高 ＝ 80<br /> <br /> 超级列表框1.全部删除 ()<br /> 图片框1.高度 ＝ 宽高<br /> 图片框1.宽度 ＝ 宽高<br /> <br /> 图片组 ＝ 建空图片组 (宽高, 宽高)<br /> 画板1.宽度 ＝ 10 × 宽高<br /> 画板1.高度 ＝ 四舍五入 (num ÷ 10, 0) × 宽高<br /> 调试输出 (画板1.高度)<br /> 画板1.刷新显示 ()<br /> a ＝ 1<br /> b ＝ 1<br /> .计次循环首 (num, i)<br />     画板1.刷子颜色 ＝ 取随机数 (1, 65535)<br /> <br />     .判断开始 (a ＞ 10)<br />         a ＝ 1<br />         b ＝ b ＋ 1<br />         画板1.填充矩形 ((a － 1) × 宽高, (b － 1) × 宽高, a × 宽高, b × 宽高)<br />     .默认<br />         画板1.填充矩形 ((a － 1) × 宽高, (b － 1) × 宽高, a × 宽高, b × 宽高)<br />     .判断结束<br /> <br /> <br />     画板1.定位写出 ((a － 1) × 宽高 ＋ 10, (b － 1) × 宽高 ＋ 10, 到文本 (i))<br />     a ＝ a ＋ 1<br />     处理事件 ()<br /> .计次循环尾 ()<br /> <br /> 加入图片 (图片组, 画板1.取图片 (, ), 0)<br /> <br /> 超级列表框1.图片组 ＝ 图片组<br /> .计次循环首 (num, i)<br />     超级列表框1.插入表项 (, 到文本 (i), i － 1, , , )<br />     处理事件 ()<br /> .计次循环尾 ()

时髦猪

  

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

变量名	类 型	静态	数组	备 注
num	整数型
宽高	整数型
i	整数型
图片组	字节集
图片组1	字节集
图片组2	字节集

num ＝ 176
宽高 ＝ 80
超级列表框1.全部删除 ()
图片框1.高度 ＝ 宽高
图片框1.宽度 ＝ 宽高
图片组 ＝ 建空图片组 (宽高, 宽高)
图片组1 ＝ 建空图片组 (宽高, 宽高)
图片组2 ＝ 建空图片组 (宽高, 宽高)
画板1.宽度 ＝ 宽高
画板1.高度 ＝ 宽高
画板1.刷新显示 ()
计次循环首 (num, i)
画板1.刷子颜色 ＝ 取随机数 (1, 65535)
画板1.填充矩形 (1, 1, 80, 80)
画板1.定位写出 (10, 10, 到文本 (i))
a ＝ a ＋ 1
判断 (i ＜ 70)
加入图片 (图片组, 画板1.取图片 (, ), 0)
判断 (i ＜ 140)
加入图片 (图片组1, 画板1.取图片 (, ), 0)
加入图片 (图片组2, 画板1.取图片 (, ), 0)

画板1.清除 (, , , )
处理事件 ()
计次循环尾 ()
图片组 ＝ 合并图片组 (图片组, 图片组1)
图片组 ＝ 合并图片组 (图片组, 图片组2)
' 加入图片 (图片组, 画板1.取图片 (, ), 0)
超级列表框1.图片组 ＝ 图片组
计次循环首 (num, i)
超级列表框1.插入表项 (, 到文本 (i), i － 1, , , )
处理事件 ()
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一
iext2	扩展界面支持库二

.版本 2<br /> .支持库 iext<br /> .支持库 iext2<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 num, 整数型<br /> .局部变量 宽高, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 图片组, 字节集<br /> .局部变量 图片组1, 字节集<br /> .局部变量 图片组2, 字节集<br /> <br /> num ＝ 176<br /> 宽高 ＝ 80<br /> 超级列表框1.全部删除 ()<br /> 图片框1.高度 ＝ 宽高<br /> 图片框1.宽度 ＝ 宽高<br /> 图片组 ＝ 建空图片组 (宽高, 宽高)<br /> 图片组1 ＝ 建空图片组 (宽高, 宽高)<br /> 图片组2 ＝ 建空图片组 (宽高, 宽高)<br /> 画板1.宽度 ＝ 宽高<br /> 画板1.高度 ＝ 宽高<br /> 画板1.刷新显示 ()<br /> .计次循环首 (num, i)<br />     画板1.刷子颜色 ＝ 取随机数 (1, 65535)<br />     画板1.填充矩形 (1, 1, 80, 80)<br />     画板1.定位写出 (10, 10, 到文本 (i))<br />     a ＝ a ＋ 1<br />     .判断开始 (i ＜ 70)<br />         加入图片 (图片组, 画板1.取图片 (, ), 0)<br />     .判断 (i ＜ 140)<br />         加入图片 (图片组1, 画板1.取图片 (, ), 0)<br />     .默认<br />         加入图片 (图片组2, 画板1.取图片 (, ), 0)<br />     .判断结束<br /> <br />     画板1.清除 (, , , )<br />     处理事件 ()<br /> .计次循环尾 ()<br /> 图片组 ＝ 合并图片组 (图片组, 图片组1)<br /> 图片组 ＝ 合并图片组 (图片组, 图片组2)<br /> ' 加入图片 (图片组, 画板1.取图片 (, ), 0)<br /> 超级列表框1.图片组 ＝ 图片组<br /> .计次循环首 (num, i)<br />     超级列表框1.插入表项 (, 到文本 (i), i － 1, , , )<br />     处理事件 ()<br /> .计次循环尾 ()

枫槿

求大神解答呜呜呜

black0216

你指望别人自己创建一个窗口，然后创建超级列表框，再拖一个画板，复制你的代码，然后去测试吗？
说白了，再热心的人，当回答问题都有门槛我都不想去弄了，顺便一提，图片组貌似是有长度上限的，以前回答遇到过，你可以缩小图片像素测试测试

枫槿

black0216 发表于 2024-5-25 11:47
你指望别人自己创建一个窗口，然后创建超级列表框，再拖一个画板，复制你的代码，然后去测试吗？
...

源码 2.e (5.96 KB, 下载次数: 4)

2024-5-25 11:50 上传

点击文件名下载附件   抱歉抱歉  哥哥  这是源码  您方便的话 看一下呗。

CF无情

求一套exe dll一键加易游网络验证源码