使用Gdiplus模块自绘界面按钮事件

易语言 2020-07-25 00:08:10

使用Gdiplus模块自绘界面按钮事件

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

真彩窗口.复制GP内存图形到画布 (按钮, 100, 100, 按钮.取宽度 (), 按钮.取高度 ())
图像.销毁 ()
按钮矩形 = 制矩形L (100, 100, 按钮.取宽度 (), 按钮.取高度 ())
图像.创建自字节集 (#关闭_正常)
关闭.创建 (图像.取宽度 (), 图像.取高度 ())
关闭.画图像缩放 (图像, 0, 0, 47, 20, )
真彩窗口.复制GP内存图形到画布 (关闭, 宽度 - 49, 2, 47, 20)
图像.销毁 ()
真彩窗口.刷新画布 ()
窗口旧过程 = SetWindowLongA (取窗口句柄 (), -4, 到整数 (&消息回调))