1.易语言 做滚动公告,易语言桌语怎么循环滚动不同的面滚码易理财钱包app源码内容。
易语言 做滚动公告,动源区块链带竞猜游戏源码怎么循环滚动不同的滚动口袋妖怪复刻私服源码内容。
.版本 2.程序集 窗口程序集1
.程序集变量 公告,框用大灰狼8.62远控源码 文本型, , "0"
.程序集变量 GgID, 整数型
.程序集变量 提示, 文本型, , "0"
.程序集变量 TsID, 整数型
.子程序 __启动窗口_创建完毕
.局部变量 Path, 文本型
.局部变量 Text, 文本型, , "0"
.局部变量 I, 整数型
Path = 取运行目录 () + “\配置.ini”
Text = 取配置节名 (Path)
.计次循环首 (取数组成员数 (Text), I)
.判断开始 (到大写 (取文本左边 (Text [I], 取文本长度 (Text [I]) - 1)) = “GG”)
加入成员 (公告, 读配置项 (Path, Text [I], “lr”, ))
.判断 (到大写 (取文本左边 (Text [I], 取文本长度 (Text [I]) - 1)) = “TS”)
加入成员 (提示, 读配置项 (Path, Text [I], “lr”, ))
.默认
.判断结束
.计次循环尾 ()
.子程序 _时钟1_周期事件
.如果真 (取数组成员数 (公告) > 0)
.如果真 (GgID = 取数组成员数 (公告))
GgID = 0
.如果真结束
GgID = GgID + 1
标签1.标题 = 公告 [GgID]
.如果真结束
.如果真 (取数组成员数 (提示) > 0)
.如果真 (TsID = 取数组成员数 (提示))
TsID = 0
.如果真结束
TsID = TsID + 1
标签2.标题 = 提示 [TsID]