动态影像进度条带模块

.子程序 仿Win7进度条动态影像进度比, , 公开
.参数 画框组件, 画板
.参数 进度比, 整数型, , 0-100的整数，进度比
.参数 是否显示进度比, 逻辑型, 可空, 默认为假
.参数 亮点颜色
.参数 以完成进度颜色
.参数 未完成进度颜色