GDI环形进度条创建

易语言 2020-06-13 15:37:15

hDC = GetDC (句柄)
Graphics.创建 (宽度, 高度)
Graphics.置平滑模式 (#平滑模式_最佳质量)
Graphics.置文本渲染模式 (#文本渲染模式_ClearType文本和hinting技术)
Graphics.清除 (RGB到ARGB (#白色))
' -------------------------------------- 画圆形
画弧形 (Graphics.取指针 (), 进度矩形, RGB到ARGB (#银白, 180), RGB到ARGB (取颜色值 (0, 224, 128), ), -90, 角度 × 3.6)
' -------------------------------------- 画中间文本
Brush.创建 (RGB到ARGB (取颜色值 (0, 224, 128), ))
文本矩形 = 制矩形F (默认矩形.左边, 默认矩形.顶边, 默认矩形.宽度, 默认矩形.高度)
' -------------------------------------- 画进度数字
Graphics.画文本 (到文本 (角度) + “%”, 字体, Brush, 文本矩形, 文本格式)
' -------------------------------------- 复制动画