计次循环的问题！

月下饮茶

  

子程序名	返回值类型	公开	备 注
绘制数字
参数名	类 型	参考	可空	数组	备 注
X1	整数型
Y1	整数型
D3DSprite	整数型
文本	文本型

变量名	类 型	静态	数组	备 注
图片	文本型
局_长度	整数型
局_次数	整数型
局_序号	文本型
局_图片	字节集
局_文本	文本型
i	整数型
逗号	文本型
局部地址	整数型
x	整数型
y	整数型
w	整数型
h	整数型
图片地址	整数型

图片 ＝ “C:\Users\Administrator\Desktop\新建文件夹\”
局_文本 ＝ 到半角 (文本)
局_长度 ＝ 取文本长度 (局_文本)
计次循环首 (局_长度, 局_次数)
局_序号 ＝ 取文本中间 (局_文本, 局_长度 － 局_次数 ＋ 1, 1)
如果真 (局_序号 ＝ “,”)
局_序号 ＝ “10”
局_图片 ＝ 读入文件 (图片 ＋ “u_s_” ＋ 局_序号 ＋ “.png”)
局部地址 ＝ 字节转内存图像 (全_设备指针, 局_图片)
如果 (局_序号 ＝ “10”)
加入成员 (Texture, 到文本 (局部地址) ＋ #换行符 ＋ 到文本 (Y1 ＋ 14) ＋ “|” ＋ 到文本 (X1 ＋ 8) ＋ “*12”)
加入成员 (Texture, 到文本 (局部地址) ＋ #换行符 ＋ 到文本 (Y1) ＋ “|” ＋ 到文本 (X1) ＋ “*32”)

计次循环尾 ()
计次循环首 (取数组成员数 (Texture), i)
图片地址 ＝ 到整数 (文本_取左边 (Texture [i], #换行符 ))
x ＝ 到整数 (文本_取右边 (Texture [i], “|”))
y ＝ 到整数 (文本_取右边 (Texture [i], #换行符 ))
w ＝ 到整数 (文本_取右边 (Texture [i], “*”))
h ＝ w
绘制_图片 (D3DSprite, 图片地址, x － i × 12, y, w, h)
如果真 (取数组成员数 (Texture) ＝ i)
i ＝ 0
清除数组 (Texture)
到循环尾 ()

计次循环尾 ()

.版本 2<br /> <br /> .子程序 绘制数字<br /> .参数 X1, 整数型<br /> .参数 Y1, 整数型<br /> .参数 D3DSprite, 整数型<br /> .参数 文本, 文本型<br /> .局部变量 图片, 文本型<br /> .局部变量 局_长度, 整数型<br /> .局部变量 局_次数, 整数型<br /> .局部变量 局_序号, 文本型<br /> .局部变量 局_图片, 字节集<br /> .局部变量 局_文本, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 逗号, 文本型<br /> .局部变量 局部地址, 整数型<br /> .局部变量 x, 整数型<br /> .局部变量 y, 整数型<br /> .局部变量 w, 整数型<br /> .局部变量 h, 整数型<br /> .局部变量 图片地址, 整数型<br /> <br /> 图片 ＝ “C:\Users\Administrator\Desktop\新建文件夹\”<br /> 局_文本 ＝ 到半角 (文本)<br /> 局_长度 ＝ 取文本长度 (局_文本)<br /> .计次循环首 (局_长度, 局_次数)<br />     局_序号 ＝ 取文本中间 (局_文本, 局_长度 － 局_次数 ＋ 1, 1)<br />     .如果真 (局_序号 ＝ “,”)<br />         局_序号 ＝ “10”<br />     .如果真结束<br />     局_图片 ＝ 读入文件 (图片 ＋ “u_s_” ＋ 局_序号 ＋ “.png”)<br />     局部地址 ＝ 字节转内存图像 (全_设备指针, 局_图片)<br />     .如果 (局_序号 ＝ “10”)<br />         加入成员 (Texture, 到文本 (局部地址) ＋ #换行符 ＋ 到文本 (Y1 ＋ 14) ＋ “|” ＋ 到文本 (X1 ＋ 8) ＋ “*12”)<br />     .否则<br />         加入成员 (Texture, 到文本 (局部地址) ＋ #换行符 ＋ 到文本 (Y1) ＋ “|” ＋ 到文本 (X1) ＋ “*32”)<br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> <br /> .计次循环首 (取数组成员数 (Texture), i)<br />     图片地址 ＝ 到整数 (文本_取左边 (Texture <i>, #换行符))<br />     x ＝ 到整数 (文本_取右边 (Texture <i>, “|”))<br />     y ＝ 到整数 (文本_取右边 (Texture <i>, #换行符))<br />     w ＝ 到整数 (文本_取右边 (Texture <i>, “*”))<br />     h ＝ w<br />     绘制_图片 (D3DSprite, 图片地址, x － i × 12, y, w, h)<br />     .如果真 (取数组成员数 (Texture) ＝ i)<br />         i ＝ 0<br />         清除数组 (Texture)<br />         到循环尾 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()

一直无限循环 导致程序崩溃 内存不足 卡死！

大神帮帮忙！

钥匙key

如果真 (取数组成员数 (Texture) ＝ i)
i ＝ 0
清除数组 (Texture)
跳出循环 ()

补充内容 (2023-4-12 11:47):
可能是这里？

钥匙key

看代码。不应该呀。。这逻辑。没啥问题才对呀。难道是绘制的问题？？有没有调试输出看看卡在哪了？

月下饮茶

钥匙key 发表于 2023-4-12 11:47
看代码。不应该呀。。这逻辑。没啥问题才对呀。难道是绘制的问题？？有没有调试输出看看卡在哪了？ ...

  一直无限循环 绘制 导致内存跑高 ！

月下饮茶

钥匙key 发表于 2023-4-12 11:47
看代码。不应该呀。。这逻辑。没啥问题才对呀。难道是绘制的问题？？有没有调试输出看看卡在哪了？ ...

因为在线程里面！

月下饮茶

钥匙key 发表于 2023-4-12 11:47
如果真 (取数组成员数 (Texture) ＝ i)
i ＝ 0
清除数组 (Texture)

这里我试过 也还是一样！

秀才遇到兵

如果真 (取数组成员数 (Texture) ＝ i)
i ＝ 0
清除数组 (Texture)
到循环尾 ()

这一句的 =0  就代表进入无限循环了，  把这个 i=0  删掉

星星之夜

把 i=0  删去即可

月下饮茶

秀才遇到兵 发表于 2023-4-12 11:57
如果真 (取数组成员数 (Texture) ＝ i)
i ＝ 0
清除数组 (Texture)

试了 还是一样！

月下饮茶

星星之夜 发表于 2023-4-12 12:00
把 i=0  删去即可

试过了 还是一样 内存跑高！