Gdiplus模块自绘界面、按钮及事件

使用Gdiplus模块自绘界面，按钮及事件的实现。

我也是刚接触，不太熟悉，所以代码可能有些不谨慎或者不当的地方。

.如果真 (wMsg ＝ 514)
鼠标操作 (#按钮_焦点)
调试输出 (“弹起”)
信息框 (“起点工作室，遗失制作。”, 0, )
随意移动 ＝ 真
' 不知道为什么，经常检测不到这个消息

图像.创建自字节集 (图, )
按钮.画图像部分 (背景, 0, 0, 100, 100, 按钮.取宽度 (), 按钮.取高度 (), #单位_像素)
按钮.画图像缩放 (图像, 0, 0, 按钮.取宽度 (), 按钮.取高度 (), )
真彩窗口.复制GP内存图形到画布 (按钮, 100, 100, 按钮.取宽度 (), 按钮.取高度 ())
图像.销毁 ()
真彩窗口.刷新画布 ()