大家好,又见面了,我是你们的朋友全栈君。
进度条是易语言常用的一个组件,有时候我们想让进度有个性,比如绘制一个圆形进度条,下面封装了子程序,直接调用就可以了。...一、源码:
.版本 2
.子程序 画圆进度条, 整数型
.参数 画板, 画板, , 画板名称
.参数 最小位置, 双精度小数型, , 进度条的最小初始值
.参数 当前位置, 双精度小数型, , 返回当前的位置....参数 最大位置, 双精度小数型, , 进度条的最大位置
.参数 进度条宽度, 整数型, , 进度条宽度
.参数 进度条背景色, 整数型, 可空, 进度条背景色
.参数 进度条颜色, 整数型, 可空,...÷ 2, 到文本 (变量) + “%”)
.如果 (当前位置 ≥ 最大位置)
返回 (最大位置)
.否则
返回 (当前位置)
.如果结束
二、调用方法
要通过时钟来调用
.版本 2
.子程序 _时钟...(画圆进度条 (画板1, 到数值 (编辑框1.内容), i, 到数值 (编辑框2.内容), 到数值 (编辑框3.内容), 颜色选择器1.颜色, 颜色选择器2.颜色, 颜色选择器3.颜色))
源码:易语言自绘圆形进度条源码