精益模块 进度条_模拟 改进建议~

木小果

可以更自由的修改文字坐标、尺寸、内容等

  

子程序名	返回值类型	公开	备 注
进度条_模拟Ex	整数型		画板高度调个20就行了。宽度自己看着调,源码由【木小果】提供,返回百分比
参数名	类 型	参考	可空	数组	备 注
画板	画板
最大位置	整数型
当前位置	整数型
进度条颜色	整数型				可人，默认为红色；比如 生命值 一般都用红色，真气值一般都用蓝色
提示文本	画板_进度条信息				用数组表示。留空不显示。和[是否显示百分比]二选一

变量名	类 型	静态	数组	备 注
横变量	双精度小数型
i1	整数型

如果真 (是否为空 (进度条颜色))
进度条颜色 ＝ #红色
画板.清除 (, , , )
画板.自动重画 ＝ 真
画板.**颜色 ＝ 进度条颜色
横变量 ＝ 到数值 (当前位置 ÷ 最大位置) × 画板.宽度
画板.填充矩形 (画板.画笔粗细, 画板.高度, 横变量, 画板.高度 ÷ 100)
如果真 (取反 (是否为空 (提示文本)))
计次循环首 (取数组成员数 (提示文本), i1)
画板.字体.字体大小 ＝ 提示文本 [i1].文本尺寸
画板.定位写出 (提示文本 [i1].文本坐标.横, 提示文本 [i1].文本坐标.纵, 提示文本 [i1].提示内容)
计次循环尾 ()

返回 (取整 (当前位置 ÷ 最大位置 × 100))

.版本 2<br /> <br /> .子程序 进度条_模拟Ex, 整数型, 公开, 画板高度调个20就行了。宽度自己看着调,源码由【木小果】提供,返回百分比<br /> .参数 画板, 画板<br /> .参数 最大位置, 整数型<br /> .参数 当前位置, 整数型<br /> .参数 进度条颜色, 整数型, 可空, 可人，默认为红色；比如 生命值 一般都用红色，真气值一般都用蓝色<br /> .参数 提示文本, 画板_进度条信息, 可空 数组, 用数组表示。留空不显示。和[是否显示百分比]二选一<br /> .局部变量 横变量, 双精度小数型<br /> .局部变量 i1, 整数型<br /> <br /> .如果真 (是否为空 (进度条颜色))<br />     进度条颜色 ＝ #红色<br /> .如果真结束<br /> 画板.清除 (, , , )<br /> 画板.自动重画 ＝ 真<br /> 画板.**颜色 ＝ 进度条颜色<br /> 横变量 ＝ 到数值 (当前位置 ÷ 最大位置) × 画板.宽度<br /> 画板.填充矩形 (画板.画笔粗细, 画板.高度, 横变量, 画板.高度 ÷ 100)<br /> <br /> .如果真 (取反 (是否为空 (提示文本)))<br />     .计次循环首 (取数组成员数 (提示文本), i1)<br />         画板.字体.字体大小 ＝ 提示文本 [i1].文本尺寸<br />         画板.定位写出 (提示文本 [i1].文本坐标.横, 提示文本 [i1].文本坐标.纵, 提示文本 [i1].提示内容)<br />     .计次循环尾 ()<br /> .如果真结束<br /> <br /> 返回 (取整 (当前位置 ÷ 最大位置 × 100))

  

数据类型名	公开	备 注
画板_进度条信息
成员名	类 型	传址	数组	备 注
提示内容	文本型
文本尺寸	整数型
文本坐标	精易_坐标

.版本 2<br /> <br /> .数据类型 画板_进度条信息, 公开<br />     .成员 提示内容, 文本型<br />     .成员 文本尺寸, 整数型<br />     .成员 文本坐标, 精易_坐标

进度条Ex.e (933.97 KB, 下载次数: 33)

2022-11-23 13:14 上传

点击文件名下载附件
精易模块 10.4.5_进度条EX.rar (963.6 KB, 下载次数: 32)

2022-11-23 13:14 上传

点击文件名下载附件

lengxiaowei

66666666666666666666666666666666666666666666666

dxp04

一直不知道进度条如何使用，感谢

jonyzhr

精易模块yyds

dj999

精易模块YYDS

李泽勇2

感觉这样修改把简单的东西搞复杂了。

jjwg99

努力赚币

jjwg99

这个可以有