精易论坛

标题: 求助图片框读图片 [打印本页]

作者: 我很低调    时间: 2025-4-21 19:42
标题: 求助图片框读图片
闪烁效果.e (3.1 KB, 下载次数: 3)   怎么要图片框循环读取2张图片达到闪烁效果

作者: 丿Mrs°戮默    时间: 2025-4-21 19:42
  
子程序名返回值类型公开备 注
_按钮1_被单击  
启动线程 (&子程序1, , )
子程序名返回值类型公开备 注
子程序1  
变量名类 型静态数组备 注
I整数型 
计次循环首 (15, I)
调试输出 (I)
图片框1.图片 = #图片1
延时 (500)
图片框1.图片 = #图片2
延时 (500)
计次循环尾 ()


i支持库列表   支持库注释   
EThread多线程支持库
spec特殊功能支持库


作者: 旭哥520    时间: 2025-4-21 20:03
楼上正解,不使用线程,程序直接假死不动
作者: zainex    时间: 2025-4-21 20:03
放到一个线程里就行了:
  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
变量名类 型数组备 注
退出逻辑型  

子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
开始逻辑型 
如果 (开始 = )
开始 = 真
退出 = 假
启动线程 (&线程, , )
开始 = 假
退出 = 真
调试输出 (开始, 退出)
子程序名返回值类型公开备 注
线程  
变量名类 型静态数组备 注
索引整数型 
图片字节集0
图片 = { #图片1, #图片2 }
索引 = 1
判断循环首 (退出 = )
索引 = 多项选择 (索引, 2, 1)
图片框1.图片 = 图片 [索引]
延时 (10)
判断循环尾 ()
图片框1.图片 = {  }


i支持库列表   支持库注释   
EThread多线程支持库
spec特殊功能支持库






欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4