不懂就问，还是循环显示图片的问题。。。

xf702

  

子程序名	返回值类型	公开	备 注
图片读取1			1#

变量名	类 型	静态	数组	备 注
图片数组	文本型		0
i	整数型
文件地址	文本型
计次

文件地址 ＝ 取运行目录 () ＋ “\车\车1”
文件_枚举 (文件地址, “*.jpg”, 图片数组, 真, , )
计次循环首 (取数组成员数 (图片数组), i)
图片框1.图片 ＝ 读入文件 (图片数组 [i])
程序_延时 (3, 1)
计次循环尾 ()

.版本 2<br /> <br /> .子程序 图片读取1, , , 1#<br /> .局部变量 图片数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 文件地址, 文本型<br /> .局部变量 计次<br /> <br /> 文件地址 ＝ 取运行目录 () ＋ “\车\车1”<br /> 文件_枚举 (文件地址, “*.jpg”, 图片数组, 真, , )<br /> .计次循环首 (取数组成员数 (图片数组), i)<br />     图片框1.图片 ＝ 读入文件 (图片数组 <i>)<br />     程序_延时 (3, 1)<br /> .计次循环尾 ()

用载入窗口的方式显示文件夹图片，但如果图片还没循环显示完毕时关闭该窗口，会报错，请问如何解决呢？

亮蓝色的风

xf702 发表于 2024-1-20 11:29
好的，我学习一下。。看看如何转化。。

做成子程序 点击树型框的时候 调用子程序 传递目录参数就行

  

子程序名	返回值类型	公开	备 注
图片显示
参数名	类 型	参考	可空	数组	备 注
目录	文本型

变量名	类 型	静态	数组	备 注
图片数组	文本型		0
i	整数型

时钟1.时钟周期 ＝ 0
文件_枚举 (目录, “*.jpg”, 图片数组, 真, , )
重定义数组 (图片数据, 假, 取数组成员数 (图片数组))
计次循环首 (取数组成员数 (图片数组), i)
图片数据 [i] ＝ 读入文件 (图片数组 [i])
计次循环尾 ()
_时钟1_周期事件 ()
时钟1.时钟周期 ＝ 3000

.版本 2<br /> <br /> .子程序 图片显示<br /> .参数 目录, 文本型<br /> .局部变量 图片数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 时钟1.时钟周期 ＝ 0<br /> 文件_枚举 (目录, “*.jpg”, 图片数组, 真, , )<br /> 重定义数组 (图片数据, 假, 取数组成员数 (图片数组))<br /> .计次循环首 (取数组成员数 (图片数组), i)<br />     图片数据 <i> ＝ 读入文件 (图片数组 <i>)<br /> .计次循环尾 ()<br /> _时钟1_周期事件 ()<br /> 时钟1.时钟周期 ＝ 3000

xiaoyu1986

窗口.可否被关闭。

结束（）

高先生

我不是让你加时钟吗.刚才那贴就让你加时钟了 你把图片数组设定程序集数组 然后时钟轮播

xf702

高先生 发表于 2024-1-19 23:23
我不是让你加时钟吗.刚才那贴就让你加时钟了 你把图片数组设定程序集数组 然后时钟轮播 ...

还有没有别的办法？

风度猫

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

启动线程 (&图片读取1, , G_读取句柄)

子程序名	返回值类型	公开	备 注
图片读取1

子程序名	返回值类型	公开	备 注
__启动窗口_可否被关闭	逻辑型

强制结束线程 (G_读取句柄)

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 启动线程 (&图片读取1, , G_读取句柄)<br /> <br /> <br /> .子程序 图片读取1<br /> <br /> <br /> <br /> .子程序 __启动窗口_可否被关闭, 逻辑型<br /> <br /> 强制结束线程 (G_读取句柄)

风度猫

xf702

xiaoyu1986 发表于 2024-1-19 23:23
窗口.可否被关闭。

结束（）

很棒啊，简单，直接！！不好的就是连启动窗口一起关掉了。。

知足常

关闭窗口的时候加一个结束命令，不行就加一个强制结束命令就可以了

xiaoyu1986

  

子程序名	返回值类型	公开	备 注
图片读取1			1#

变量名	类 型	静态	数组	备 注
图片数组	文本型		0
i	整数型
文件地址	文本型
计次

文件地址 ＝ 取运行目录 () ＋ “\车\车1”
文件_枚举 (文件地址, “*.jpg”, 图片数组, 真, , )
计次循环首 (取数组成员数 (图片数组), i)
图片框1.图片 ＝ 读入文件 (图片数组 [i])
如果真 (全_结束)
跳出循环 ()
程序_延时 (3, 1)
计次循环尾 ()
全_关闭 = 真

子程序名	返回值类型	公开	备 注
__启动窗口_可否被关闭	逻辑型

判断循环首 (全_关闭 = 假)
延时 (1)
处理事件 ()
判断循环尾 ()
销毁 ()

.版本 2<br /> <br /> .子程序 图片读取1, , , 1#<br /> .局部变量 图片数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 文件地址, 文本型<br /> .局部变量 计次<br /> <br /> 文件地址 ＝ 取运行目录 () ＋ “\车\车1”<br /> 文件_枚举 (文件地址, “*.jpg”, 图片数组, 真, , )<br /> .计次循环首 (取数组成员数 (图片数组), i)<br />     图片框1.图片 ＝ 读入文件 (图片数组 <i>)<br />     .如果真 (全_结束)<br />         跳出循环()<br />     .如果真结束<br />     程序_延时 (3, 1)<br /> .计次循环尾 ()<br /> 全_关闭 = 真<br /> <br /> .子程序 __启动窗口_可否被关闭, 逻辑型<br /> <br /> .判断循环首 (全_关闭 = 假)<br />     延时 (1)<br />     处理事件 ()<br /> .判断循环尾 ()<br /> 销毁 ()