【ros源码】【拇指赚源码】【雷课堂源码】易语言滚动公告源码_易语言滚动条怎么用

2024-12-23 01:14:51 来源:gerrit 源码 分类:知识

1.易语言 做滚动公告,易语言滚语怎么循环滚动不同的告源滚动ros源码内容。

易语言滚动公告源码_易语言滚动条怎么用

易语言 做滚动公告,码易拇指赚源码怎么循环滚动不同的条用雷课堂源码内容。

       .版本 2

       .程序集 窗口程序集1

       .程序集变量 公告,易语言滚语微同源码 文本型, , "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]

更多资讯请点击:知识

推荐资讯

吉林临江:药品安全宣传活动走深走实

中国消费者报长春讯记者李洪涛)为切实提升公众药品安全科学素养、推动药品安全社会共治,12月10日,吉林省临江市市场监管局组织执法人员成立宣讲队,走进社区开展药品安全宣传活动,让药品安全宣传活动走实入心

美國國家運輸安全委員會:空中「掉門」波音客機缺少4個螺栓

據央視新聞援引路透社報道,當地時間2月6日,美國國家運輸安全委員會(NTSB)發布了一份關於阿拉斯加航空公司1月發生的航班事故初步調查報告。根據初步調查,當時正執行飛行任務的波音737 MAX 9型客

捍衛戰士金曲原唱! 傑瑞李路易斯逝世 享壽87歲

美國搖滾樂先驅傑瑞‧李‧路易斯Jerry Lee Lewis),28日在家中過世,享壽87歲。路易斯以一頭飄逸金髮、誇張的表演方式,闖出名號,曾經是貓王的好友,又是競爭對手。他的搖滾樂名曲「巨大火球」