易语言GDIPlus智能换肤模块例程

.变量循环首 (1, 取数组成员数 (程序集_导航按钮信息), 1, 局_计次)
程序集_图形1.画图像缩放部分 (程序集_导航按钮信息 [局_计次].按钮图标, 程序集_导航按钮信息 [局_计次].位置信息.左边, 程序集_导航按钮信息 [局_计次].位置信息.顶边, 程序集_导航按钮信息 [局_计次].按钮图标.取宽度 (), 程序集_导航按钮信息 [局_计次].按钮图标.取高度 (), 0, 0, 程序集_导航按钮信息 [局_计次].按钮图标.取宽度 (), 程序集_导航按钮信息 [局_计次].按钮图标.取高度 ())
程序集_图形1.画文本 (程序集_导航按钮信息 [局_计次].按钮标题, 局_字体, 局_画刷, 程序集_导航按钮信息 [局_计次].标题位置信息, 局_文本格式)
.变量循环尾 ()

' 局_画笔.创建自颜色 (RGB到ARGB (#黑色, 200), 1)
' 程序集_图形.画矩形 (局_画笔, 1, 1, 局_窗口信息.宽度 － 局_窗口信息.左边 － 3, 局_窗口信息.高度 － 局_窗口信息.顶边 － 3)
' 不知道上面宽度和高度要多1个像素

API_GetWindowRect (程序集_窗口句柄, 局_窗口信息)
程序集_窗口DC ＝ API_GetDC (程序集_窗口句柄)
程序集_内存DC ＝ API_CreateCompatibleDC (程序集_窗口DC)
程序集_对象DC ＝ API_CreateCompatibleBitmap (程序集_窗口DC, 局_窗口信息.宽度 － 局_窗口信息.左边, 局_窗口信息.高度 － 局_窗口信息.顶边)
程序集_旧场景DC ＝ API_SelectObject (程序集_内存DC, 程序集_对象DC)
' 画上面矩形区域
程序集_图形1.画图像缩放部分 (程序集_皮肤信息.背景图片, 0, 0, 局_窗口信息.宽度 － 局_窗口信息.左边, 程序集_导航高度, 0, 5, 程序集_皮肤信息.背景图片.取宽度 (), 程序集_导航高度)