|
- <火山程序 类型 = "通常" 版本 = 1 />
- 变量 标题栏组件句柄 <类型 = 变整数>
- 变量 局_关闭按钮句柄 <类型 = 整数>
- 标题栏组件句柄 = 引擎取数值 (引擎取句柄自窗口句柄 (取窗口句柄 ().到变整数 ()), 引擎数值.标题栏组件句柄)
- 局_关闭按钮句柄 = 组件取句柄自ID (标题栏组件句柄, (整数)系统按钮类型.关闭按钮)
- 组件置圆角 (局_关闭按钮句柄, 0, 7, 0, 0, 真)
复制代码
上面这个添加到窗口创建完成
- <火山程序 类型 = "通常" 版本 = 1 />
- 如果真 (消息值 == 20)
- {
- // wParam画布句柄, LOWORD(lParam)为宽度,HIWORD(lParam)为高度
- 变量 局_画布句柄 <类型 = 整数>
- 变量 局_宽度 <类型 = 整数>
- 变量 局_高度 <类型 = 整数>
- 局_画布句柄 = (整数)消息参数1
- 局_宽度 = 取低位 (消息参数2)
- 局_高度 = 取高位 (消息参数2)
- 画布_图形抗锯齿 (局_画布句柄, 真)
- 变量 rc <类型 = RECT>
- 变量 画刷句柄 <类型 = 变整数>
- 取窗口客户区 (EX窗口句柄, rc.取指针 ())
- 画刷句柄 = 画刷_创建 (0)
- 画刷_置颜色 (画刷句柄, ExRGB2ARGB (2367776, 255))
- 画布_填充圆角矩形 (局_画布句柄, 画刷句柄, 0, 0, 局_宽度, 局_高度, 7, 7)
- 画刷_置颜色 (画刷句柄, ExRGB2ARGB (颜色类.深**, 255))
- 画布_画圆角矩形 (局_画布句柄, 画刷句柄, 0, 0, 局_宽度, 局_高度, 7, 7, 0.6, 0)
- 画刷_销毁 (画刷句柄)
- 返回值 = LRESULT指针.来自变整数 (1)
- 返回 (真)
- }
复制代码 上面这个添加到创建回调里面
|
|