码字项目源码附VJLib自绘引擎EXUI缓动特效模块

' 本次开发项目列表:
' 1.导航钮
' 2.拖动组件(未吸附线条)
' 3.选择钮
' 4.选择列表
' 5.横线编辑框
' 6.单线编辑框
' 7.选择夹
' 8.按钮
' 9.开关
' 10.VJ_library框架
' //希望各位加把劲,共同完成这个项目!
' //各种重要代码已添加标签
' // 因为受学业限制,暂时开发这么多!
' //BUG (ˉ▽ˉ；)... 微乎其微
' //没错 哥就是这么严谨
' // 更多黑科技期待你的发现哟
__Init (, #skn, “10086”, “112233”, , , , RGB_ (#黑色), , )
' //工程模式
' _Debug (真, RGB_ (#红色))
VJ_Login ()
' Main ()
线程_启动 (&_内存优化, 5)
MsgLoop ()

' //扩展_选择钮_绘画
GdipSetSmoothingMode (pGraphics, G_modle)
' //背景
.如果真 (CanFucos ())
Show (取反 (Show ()))
CanFucos (假)
.如果真结束
' //圆角矩形
_FillRectRound (pGraphics, RGB_ (16776958, 50), 0, 0, Width (), Height (), 10)
.计次循环首 (取数组成员数 (m_choose), a)
' 输出调试文本 (m_choose [a])
.如果真 (m_light ＝ a) ' //点燃
_FillRect (pGraphics, RGB_ (16776958, 50), 0, (a － 1) × Height () ÷ 2, Width (), Height () ÷ 2)
.如果真结束
_DrawString (pGraphics, _InitStringFormat (StrFormat (#StringStyle_Middle, StringA (“微软雅黑”), 15, RGB_ (#白色, 230)), , , ), StringA (m_choose [a]), RectF (0, (a － 1) × Height () ÷ 2, Width (), Height () ÷ 2))
.计次循环尾 ()
_DrawLine (pGraphics, RGB_ (16776958, 50), 0, Height () ÷ 2, Width (), Height () ÷ 2, )
' //画方框
_DrawRect (pGraphics, RGB_ (#白色, 205), 10, Height () ÷ 2 － 20 － 10 － 5, 20, 20, 1, )
' //画十字
_DrawLine (pGraphics, RGB_ (#白色, 205), 10, Height () ÷ 2 ＋ 20 ＋ 5, 10 ＋ 10 ＋ 10, Height () ÷ 2 ＋ 20 ＋ 5, 1)
' //竖线
_DrawLine (pGraphics, RGB_ (#白色, 205), 20, (Height () － 15) ÷ 2 ＋ 25 － 2, 20, (Height () － 15) ÷ 2 ＋ 25 ＋ 15 ＋ 2, 1)
输出调试文本 (位异或 (13, 14))