下你所需,载你所想!
IT技术源码资料下载网站

标签变透明标签模块

:192.321KB

:1:2021-05-27 08:20:18

部分简介

GetClassName (hWnd, buff, 100) ' 取出类名
style = 位或 (GetWindowLong (hWnd, #GWL_EXSTYLE), #WS_EX_TRANSPARENT) ' 这句很重要,取出扩展样式 并添加WS_EX_TRANSPARENT 样式
SetWindowLongA (hWnd, #GWL_EXSTYLE, style) ' 设置扩展样式
.如果 (GetClassInfo (0, buff, wnd) = 0) ' 区分E控件写出的
E_Static_ret2 = SetWindowLongA (hWnd, -4, 到整数 (&E_Static_Proc)) ' 设置消息映射 设个是用E的控件
返回值 = E_Static_ret2
.否则
Static_ret3 = SetWindowLongA (hWnd, -4, 到整数 (&Static_proc)) ' 设置消息映射 这个是用 CreateWindowEx 创建的
返回值 = Static_ret3
.如果结束
返回 (返回值 ≠ 0)
标签变透明标签模块例子。

相关阅读

最近更新