Ex_BeginPaint (hObj, exps)
图形_平滑模式 (exps.mGraphics, #平滑模式_不抗锯齿)
Text_Rect = MakeRCF (0, exps.oRcf.Height - exps.oRcf.Height × 0.18 + 1, exps.oRcf.Width, exps.oRcf.Height × 0.18)
图形_填充_矩形 (exps.mGraphics, exps.oRcf, 集_背景颜色)
绘制图像 = 图像_创建自字节集 (集_图片数据)
.判断开始 (uMsg = #状态_点燃)
图形_绘图缩放 (exps.mGraphics, 绘制图像, MakeRCF (-10, -10, exps.oRcf.Width + 20, exps.oRcf.Height + 20))
图形_填充_矩形 (exps.mGraphics, exps.oRcf, RGB2ARGB (#黑色, 60))
图形_绘图 (exps.mGraphics, 集_播放图片, exps.oRcf, , 真)
图形_描边_矩形 (exps.mGraphics, exps.oRcf, #边框_单线式, RGB2ARGB (#粉红))
.判断 (uMsg = #状态_正常)
图形_绘图缩放 (exps.mGraphics, 绘制图像, exps.oRcf)
图形_填充_矩形 (exps.mGraphics, Text_Rect, 集_背景颜色)
图形_画文本 (hObj, exps.mGraphics, Text_Rect, A2W (集_标题文本), 集_字体指针, 集_文本颜色, 集_格式指针)
图形_画阴影边框 (exps.mGraphics, exps.oRcf, 0, 集_描边颜色)
上一篇 QQ快速登陆以及获取好友和群工具
下一篇 混合运算的小程序,适合小学生使用