效果图

源码说明

.程序集 Smessage, VJ_DirectUI
.程序集变量 Format, StringFormat

.子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用



.子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用

OnDestory ()

.子程序 OnDestory

_DestoryStringFormat (Format)

.子程序 Create, , 公开
.参数 Hwnd, 整数型, 可空
.参数 rectl, RectL
.参数 提示信息, 文本型, 可空

.如果真 (Init (Hwnd, rectl, StringA (提示信息), 假, 假) ＝ 假)
    返回 ()
.如果真结束
Format ＝ _InitStringFormat (StrFormat (#StringStyle_Bold ＋ #StringStyle_VMiddle ＋ #StringStyle_Middle, , 15, RGB_ (#白色, 180)))
ReDrawMDC ()

.子程序 OnPaint
.参数 pGraphics, 整数型

GdipSetSmoothingMode (pGraphics, #平滑模式_抗锯齿)
_FillRectRound (pGraphics, RGB_ (#黑色, 210), 0, 0, Width (), Height (), Height () ÷ 2)
_DrawString (pGraphics, Format, GetText (), RectF (5, 0, Width () － 5, Height ()))

.子程序 content, , 公开
.参数 text, 文本型
.参数 time, 整数型, 可空

Show (真)
SetText (StringA (text))
ReDraw ()
.如果真 (time ≠ 0)
    delay_ (time)
    Show (假)
.如果真结束

---

领取源码

易语言QQ机器人2.0源码领取地址：关注祖龙科技工作室微信公众号回复QQ机器人即可领取

---

下期更新预报

网站源码

• 📢博客主页：孤客网络科技工作室官方账号
• 📢欢迎点赞👍收藏⭐️留言 📝如有错误敬请指正！
• 📢本文由孤客原创，若侵权联系作者，首发于CSDN博客
• 📢停下休息的时候不要忘了别人还在奔跑，希望大家抓紧时间学习，全力奔赴更好的生活💻