易语言美化软件窗口上所有的按钮

易语言 2020-08-14 13:39:18

易语言美化软件窗口上所有的按钮

找不到更好的方法复制窗口的底图到按钮上实现透明效果。

所以就先做出简单的美化先。如果有兴趣可以完善一下,发上来大家学习学习(自绘刚接触不久,所以代码写得菜,那细节就不要介意了!)

实现方法:
1、给窗口上的所以按钮添加
BS_OWNERDRAW样式,使其可以接受WM_DRAWITEM消息。

2、检测到窗口WM_DRAWITEM消息时就开始重画按钮。

Gdiplus初始化 ()
按钮添加自绘风格 (取窗口句柄 ())
' SetWindowLongA (按钮1.取窗口句柄 (), #GWL_STYLE, 位或 (GetWindowLongA (按钮1.取窗口句柄 (), #GWL_STYLE), #BS_OWNERDRAW))
h = SetWindowLongA (取窗口句柄 (), -4, 到数值 (&窗口消息中转站))