✅组件_状态条_类

莫小乐

  

数据类型名	公开	备 注
数_状态条结构
成员名	类 型	传址	数组	备 注
文本	文本型
宽度	整数型
图标	字节集

窗口程序集名	保 留	保 留	备 注
类_组件_状态条
变量名	类 型	数组	备 注
集_画板_主	画板
集_画板_次	画板
集_状态条结构	数_状态条结构	0

子程序名	返回值类型	公开	备 注
_初始化			当基于本类的对象被创建后，此方法会被自动调用

子程序名	返回值类型	公开	备 注
_销毁			当基于本类的对象被销毁前，此方法会被自动调用

子程序名	返回值类型	公开	备 注
初始化	逻辑型
参数名	类 型	参考	可空	数组	备 注
参_窗口	窗口
参_画板	画板
参_位置	整数型				1/顶边 2/底边 默认为2

集_画板_主 ＝ 参_画板
如果真 (复制窗口组件 (集_画板_主, 集_画板_次))
如果真 (是否已创建 (集_画板_主))
如果真 (是否为空 (参_位置))
参_位置 ＝ 2
判断 (参_位置 ＝ 1)
集_画板_主.移动 (0, 0, 参_窗口.宽度, 28)
判断 (参_位置 ＝ 2)
集_画板_主.移动 (0, 参_窗口.取用户区高度 () － 28, 参_窗口.宽度, 28)
返回 (假)
返回 (真)

返回 (假)

子程序名	返回值类型	公开	备 注
加入栏目	整数型		将指定栏目加入到状态条中，返回加入后该项目所处的位置。
参数名	类 型	参考	可空	数组	备 注
_文本	文本型
_宽度	整数型
_图标	字节集

变量名	类 型	静态	数组	备 注
局_状态条结构	数_状态条结构

局_状态条结构.文本 ＝ _文本
局_状态条结构.宽度 ＝ _宽度
局_状态条结构.图标 ＝ _图标
加入成员 (集_状态条结构, 局_状态条结构)
返回 (取数组成员数 (集_状态条结构))

子程序名	返回值类型	公开	备 注
删除栏目	整数型		删除指定的栏目。
参数名	类 型	参考	可空	数组	备 注
栏目索引	整数型

如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))
返回 (-1)
返回 (删除成员 (集_状态条结构, 栏目索引, 1))

子程序名	返回值类型	公开	备 注
刷新			本源码来自易语言资源网(www.eyuyan.la)

变量名	类 型	静态	数组	备 注
局_计次	整数型
局_横向位置	整数型
局_纵向位置	整数型
局_字符宽	小数型
局_图片号	整数型
局_栏宽度	整数型
局_栏标题	文本型

集_画板_次.画笔颜色 ＝ #浅灰
集_画板_次.刷子颜色 ＝ #银白
集_画板_次.文本颜色 ＝ #深灰
局_纵向位置 ＝ 集_画板_次.高度 ÷ 2 － 集_画板_次.取高度 (“易”) ÷ 2
局_字符宽 ＝ 集_画板_次.取宽度 (“E”)
计次循环首 (取数组成员数 (集_状态条结构), 局_计次)
集_画板_次.画矩形 (局_横向位置, 0, 局_横向位置 ＋ 集_状态条结构 [局_计次].宽度 ＋ 6 ＋ 15, 集_画板_次.高度)
局_横向位置 ＝ 局_横向位置 ＋ 5
如果真 (集_状态条结构 [局_计次].图标 ≠ {  })
局_图片号 ＝ 载入图片 (集_状态条结构 [局_计次].图标)
集_画板_次.画图片 (局_图片号, 局_横向位置, 局_纵向位置, 13, 13, ���取颜色值 (255, 255, 255))
卸载图片 (局_图片号)
局_横向位置 ＝ 局_横向位置 ＋ 15
如果 (取数组成员数 (集_状态条结构) ≥ 局_计次)
局_栏宽度 ＝ 集_状态条结构 [局_计次].宽度
局_栏宽度 ＝ 100
如果 (取文本长度 (集_状态条结构 [局_计次].文本) × 局_字符宽 ＞ 局_栏宽度)
局_栏标题 ＝ 取文本左边 (集_状态条结构 [局_计次].文本, 局_栏宽度 ÷ 局_字符宽 － 2) ＋ “..”
局_栏标题 ＝ 集_状态条结构 [局_计次].文本
集_画板_次.定位写出 (局_横向位置, 局_纵向位置, 局_栏标题)局_横向位置 ＝ 局_横向位置 ＋ 局_栏宽度
集_画板_次.画直线 (局_横向位置, 0, 局_横向位置, 集_画板_次.高度)
处理事件 ()
计次循环尾 ()
集_画板_次.复制 (0, 0, 集_画板_主.宽度, 集_画板_主.高度, 集_画板_主, 0, 0, #拷贝 )

子程序名	返回值类型	公开	备 注
清空	逻辑型		清除所有栏目数据

清除数组 (集_状态条结构)
返回 (取数组成员数 (集_状态条结构) ＝ 0)

子程序名	返回值类型	公开	备 注
置文本	逻辑型		设置指定栏目的文本
参数名	类 型	参考	可空	数组	备 注
栏目索引	整数型
栏目文本	文本型

如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))
返回 (假)
集_状态条结构 [栏目索引].文本 ＝ 栏目文本
返回 (真)

子程序名	返回值类型	公开	备 注
置宽度	逻辑型		设置指定栏目的宽度(单位像素)
参数名	类 型	参考	可空	数组	备 注
栏目索引	整数型
宽度	整数型

如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))
返回 (假)
集_状态条结构 [栏目索引].宽度 ＝ 宽度
返回 (真)

子程序名	返回值类型	公开	备 注
置图标	逻辑型		设置指定栏目的图标
参数名	类 型	参考	可空	数组	备 注
栏目索引	整数型
图标	字节集

如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))
返回 (假)
集_状态条结构 [栏目索引].图标 ＝ 图标
返回 (真)

子程序名	返回值类型	公开	备 注
取文本	文本型		取回指定栏目的内容文本,失败返回空
参数名	类 型	参考	可空	数组	备 注
栏目索引	整数型

如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))
返回 (“”)
返回 (集_状态条结构 [栏目索引].文本)

子程序名	返回值类型	公开	备 注
取宽度	整数型		取回指定栏目的内容宽度,失败返回-1
参数名	类 型	参考	可空	数组	备 注
栏目索引	整数型

如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))
返回 (-1)
返回 (集_状态条结构 [栏目索引].宽度)

子程序名	返回值类型	公开	备 注
取图片	字节集		取回指定栏目的内容图标,失败返回空字节集
参数名	类 型	参考	可空	数组	备 注
栏目索引	整数型

如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))
返回 ({  })
返回 (集_状态条结构 [栏目索引].图标)

子程序名	返回值类型	公开	备 注
取栏目数	整数型		取回状态条中栏目的总数

返回 (取数组成员数 (集_状态条结构))

子程序名	返回值类型	公开	备 注
取栏目左边	整数型		取回指定栏目在状态条中显示区域的左边位置

返回 (集_画板_主.左边)

子程序名	返回值类型	公开	备 注
取栏目顶边	整数型		取回指定栏目在状态条中显示区域的顶边位置

返回 (集_画板_主.顶边)

子程序名	返回值类型	公开	备 注
取栏目宽度	整数型		取回指定栏目在状态条中显示区域的宽度

返回 (集_画板_主.宽度)

子程序名	返回值类型	公开	备 注
取栏目高度	整数型		取回指定栏目在状态条中显示区域的高度

返回 (集_画板_主.高度)

.版本 2<br /> <br /> .数据类型 数_状态条结构<br />     .成员 文本, 文本型<br />     .成员 宽度, 整数型<br />     .成员 图标, 字节集<br /> <br /> <br /> <br /> .版本 2<br /> <br /> .程序集 类_组件_状态条<br /> .程序集变量 集_画板_主, 画板<br /> .程序集变量 集_画板_次, 画板<br /> .程序集变量 集_状态条结构, 数_状态条结构, , "0"<br /> <br /> .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 初始化, 逻辑型, 公开<br /> .参数 参_窗口, 窗口<br /> .参数 参_画板, 画板<br /> .参数 参_位置, 整数型, 可空, 1/顶边 2/底边 默认为2<br /> <br /> 集_画板_主 ＝ 参_画板<br /> .如果真 (复制窗口组件 (集_画板_主, 集_画板_次))<br />     .如果真 (是否已创建 (集_画板_主))<br />         .如果真 (是否为空 (参_位置))<br />             参_位置 ＝ 2<br />         .如果真结束<br />         .判断开始 (参_位置 ＝ 1)<br />             集_画板_主.移动 (0, 0, 参_窗口.宽度, 28)<br />         .判断 (参_位置 ＝ 2)<br />             集_画板_主.移动 (0, 参_窗口.取用户区高度 () － 28, 参_窗口.宽度, 28)<br />         .默认<br />             返回 (假)<br />         .判断结束<br />         返回 (真)<br />     .如果真结束<br /> <br /> .如果真结束<br /> 返回 (假)<br /> <br /> .子程序 加入栏目, 整数型, 公开, 将指定栏目加入到状态条中，返回加入后该项目所处的位置。<br /> .参数 _文本, 文本型<br /> .参数 _宽度, 整数型<br /> .参数 _图标, 字节集, 可空<br /> .局部变量 局_状态条结构, 数_状态条结构<br /> <br /> 局_状态条结构.文本 ＝ _文本<br /> 局_状态条结构.宽度 ＝ _宽度<br /> 局_状态条结构.图标 ＝ _图标<br /> 加入成员 (集_状态条结构, 局_状态条结构)<br /> 返回 (取数组成员数 (集_状态条结构))<br /> <br /> .子程序 删除栏目, 整数型, 公开, 删除指定的栏目。<br /> .参数 栏目索引, 整数型<br /> <br /> .如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))<br />     返回 (-1)<br /> .如果真结束<br /> 返回 (删除成员 (集_状态条结构, 栏目索引, 1))<br /> <br /> .子程序 刷新, , 公开, 本源码来自易语言资源网(<a href="http://www.eyuyan.la" rel="nofollow" rel="nofollow" target="_blank">www.eyuyan.la</a>)<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_横向位置, 整数型<br /> .局部变量 局_纵向位置, 整数型<br /> .局部变量 局_字符宽, 小数型<br /> .局部变量 局_图片号, 整数型<br /> .局部变量 局_栏宽度, 整数型<br /> .局部变量 局_栏标题, 文本型<br /> <br /> 集_画板_次.画笔颜色 ＝ #浅灰<br /> 集_画板_次.刷子颜色 ＝ #银白<br /> 集_画板_次.文本颜色 ＝ #深灰<br /> 局_纵向位置 ＝ 集_画板_次.高度 ÷ 2 － 集_画板_次.取高度 (“易”) ÷ 2<br /> 局_字符宽 ＝ 集_画板_次.取宽度 (“E”)<br /> .计次循环首 (取数组成员数 (集_状态条结构), 局_计次)<br />     集_画板_次.画矩形 (局_横向位置, 0, 局_横向位置 ＋ 集_状态条结构 [局_计次].宽度 ＋ 6 ＋ 15, 集_画板_次.高度)<br />     局_横向位置 ＝ 局_横向位置 ＋ 5<br />     .如果真 (集_状态条结构 [局_计次].图标 ≠ {  })<br />         局_图片号 ＝ 载入图片 (集_状态条结构 [局_计次].图标)<br />         集_画板_次.画图片 (局_图片号, 局_横向位置, 局_纵向位置, 13, 13, －取颜色值 (255, 255, 255))<br />         卸载图片 (局_图片号)<br />     .如果真结束<br />     局_横向位置 ＝ 局_横向位置 ＋ 15<br />     .如果 (取数组成员数 (集_状态条结构) ≥ 局_计次)<br />         局_栏宽度 ＝ 集_状态条结构 [局_计次].宽度<br />     .否则<br />         局_栏宽度 ＝ 100<br />     .如果结束<br />     .如果 (取文本长度 (集_状态条结构 [局_计次].文本) × 局_字符宽 ＞ 局_栏宽度)<br />         局_栏标题 ＝ 取文本左边 (集_状态条结构 [局_计次].文本, 局_栏宽度 ÷ 局_字符宽 － 2) ＋ “..”<br />     .否则<br />         局_栏标题 ＝ 集_状态条结构 [局_计次].文本<br />     .如果结束<br />     集_画板_次.定位写出 (局_横向位置, 局_纵向位置, 局_栏标题)<br />     局_横向位置 ＝ 局_横向位置 ＋ 局_栏宽度<br />     集_画板_次.画直线 (局_横向位置, 0, 局_横向位置, 集_画板_次.高度)<br />     处理事件 ()<br /> .计次循环尾 ()<br /> 集_画板_次.复制 (0, 0, 集_画板_主.宽度, 集_画板_主.高度, 集_画板_主, 0, 0, #拷贝)<br /> <br /> .子程序 清空, 逻辑型, 公开, 清除所有栏目数据<br /> <br /> 清除数组 (集_状态条结构)<br /> 返回 (取数组成员数 (集_状态条结构) ＝ 0)<br /> <br /> .子程序 置文本, 逻辑型, 公开, 设置指定栏目的文本<br /> .参数 栏目索引, 整数型<br /> .参数 栏目文本, 文本型<br /> <br /> .如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))<br />     返回 (假)<br /> .如果真结束<br /> 集_状态条结构 [栏目索引].文本 ＝ 栏目文本<br /> 返回 (真)<br /> <br /> .子程序 置宽度, 逻辑型, 公开, 设置指定栏目的宽度(单位像素)<br /> .参数 栏目索引, 整数型<br /> .参数 宽度, 整数型<br /> <br /> .如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))<br />     返回 (假)<br /> .如果真结束<br /> 集_状态条结构 [栏目索引].宽度 ＝ 宽度<br /> 返回 (真)<br /> <br /> .子程序 置图标, 逻辑型, 公开, 设置指定栏目的图标<br /> .参数 栏目索引, 整数型<br /> .参数 图标, 字节集<br /> <br /> .如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))<br />     返回 (假)<br /> .如果真结束<br /> 集_状态条结构 [栏目索引].图标 ＝ 图标<br /> 返回 (真)<br /> <br /> .子程序 取文本, 文本型, 公开, 取回指定栏目的内容文本,失败返回空<br /> .参数 栏目索引, 整数型<br /> <br /> .如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))<br />     返回 (“”)<br /> .如果真结束<br /> 返回 (集_状态条结构 [栏目索引].文本)<br /> <br /> .子程序 取宽度, 整数型, 公开, 取回指定栏目的内容宽度,失败返回-1<br /> .参数 栏目索引, 整数型<br /> <br /> .如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))<br />     返回 (-1)<br /> .如果真结束<br /> 返回 (集_状态条结构 [栏目索引].宽度)<br /> <br /> .子程序 取图片, 字节集, 公开, 取回指定栏目的内容图标,失败返回空字节集<br /> .参数 栏目索引, 整数型<br /> <br /> .如果真 (栏目索引 ＞ 取数组成员数 (集_状态条结构))<br />     返回 ({  })<br /> .如果真结束<br /> 返回 (集_状态条结构 [栏目索引].图标)<br /> <br /> .子程序 取栏目数, 整数型, 公开, 取回状态条中栏目的总数<br /> <br /> 返回 (取数组成员数 (集_状态条结构))<br /> <br /> .子程序 取栏目左边, 整数型, 公开, 取回指定栏目在状态条中显示区域的左边位置<br /> <br /> 返回 (集_画板_主.左边)<br /> <br /> .子程序 取栏目顶边, 整数型, 公开, 取回指定栏目在状态条中显示区域的顶边位置<br /> <br /> 返回 (集_画板_主.顶边)<br /> <br /> .子程序 取栏目宽度, 整数型, 公开, 取回指定栏目在状态条中显示区域的宽度<br /> <br /> 返回 (集_画板_主.宽度)<br /> <br /> .子程序 取栏目高度, 整数型, 公开, 取回指定栏目在状态条中显示区域的高度<br /> <br /> 返回 (集_画板_主.高度)

下面使用

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
状态条	类_组件_状态条

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

画板1.自动重画 ＝ 真
画板1.高度 ＝ 28
画板1.宽度 ＝ 350

子程序名	返回值类型	公开	备 注
__启动窗口_首次激活

状态条.初始化 (_启动窗口, 画板1, )
状态条.加入栏目 (“ 已显示：0 条”, 100, )
状态条.加入栏目 (“队列中：0 条”, 100, )
状态条.加入栏目 (“路径：无”, 150, )
状态条.刷新 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 状态条, 类_组件_状态条<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 画板1.自动重画 ＝ 真<br /> 画板1.高度 ＝ 28<br /> 画板1.宽度 ＝ 350<br /> <br /> .子程序 __启动窗口_首次激活<br /> <br /> 状态条.初始化 (_启动窗口, 画板1, )<br /> 状态条.加入栏目 (“ 已显示：0 条”, 100, )<br /> 状态条.加入栏目 (“队列中：0 条”, 100, )<br /> 状态条.加入栏目 (“路径：无”, 150, )<br /> 状态条.刷新 ()

游客，如果您要查看本帖隐藏内容请回复

莫小乐

huxian 发表于 2026-6-27 15:17
最主要你这样发源码很多参数是没有的  复制不了  比如#文本 全局变量之类很多 ...

仔细阅读代码。自己复制的不对，

shanhet

1111111111111111

pbest

感谢大神分享~！

乌鸦作飞机

如果您要查看本帖隐藏内容请回复

我很低调

111111111111111111

gaoqing

谢谢分享

胖子葛格

感谢大神分享~！

李泽勇2

看着很漂亮，比自带的组件好看很多，感谢分享！

bianyuan456

已经顶贴，感谢您对论坛的支持！

lm88818

感谢分享，很给力！~