窗口程序集名 | 保 留 | 保 留 | 备 注 |
窗口程序集_启动窗口 | | | |
变量名 | 类 型 | 数组 | 备 注 |
集宽度 | 整数型 | |
是否刷新 | 逻辑型 | |
原始样式 =
GetWindowLongA (_启动窗口.
取窗口句柄 (),
#GWL_EXSTYLE )SetWindowLongA (_启动窗口.
取窗口句柄 (),
#GWL_EXSTYLE, 位或 (原始样式,
#WS_EX_COMPOSITED ))
SetWindowLongA (_启动窗口.
取窗口句柄 (),
#GWL_STYLE, 位或 (GetWindowLongA (_启动窗口.
取窗口句柄 (),
#GWL_STYLE ),
#WS_CLIPCHILDREN ))
SetWindowLongA (透明标签公告.
取窗口句柄 (),
#GWL_EXSTYLE, 位或 (GetWindowLongA (透明标签公告.
取窗口句柄 (),
#GWL_EXSTYLE ),
#WS_EX_LAYERED ))
透明标签公告.标题 =
到文本 ({ 185, 171, 184, 230, 163, 186, 190, 173, 185, 253, 209, 207, 208, 204, 191, 189, 180, 242, 68, 101, 101, 112, 83, 101, 101, 107, 45, 86, 200, 253, 204, 236, 163, 172, 214, 213, 211, 218, 178, 187, 201, 193, 203, 184, 193, 203, 163, 172, 215, 247, 213, 223, 163, 186, 57, 50, 56, 56, 51, 53, 52, 49, 57
})透明标签公告.宽度 =
取文本长度 (透明标签公告.标题
) × 18
集宽度 = _启动窗口.宽度
时钟1.时钟周期 = 25
是否刷新 = 真
如果真 (取启动时间 () - 上次时间 < 25
)
返回 ()上次时间 = 取启动时间 ()
如果真 (是否刷新
)
是否刷新 = 假

如果真 (集宽度 ≤ -透明标签公告.宽度
)

集宽度 = _启动窗口.宽度


LockWindowUpdate (_启动窗口.
取窗口句柄 ())
移动控件 (透明标签公告.
取窗口句柄 (), 集宽度, 透明标签公告.顶边
)
LockWindowUpdate (0
)
集宽度 = 集宽度 - 2

是否刷新 = 真
hdwp =
BeginDeferWindowPos (1
)hdwp =
DeferWindowPos (hdwp, hWnd, 0, x, y, 0, 0,
位或 ( #SWP_NOSIZE, #SWP_NOZORDER, #SWP_NOACTIVATE, #SWP_NOCOPYBITS ))
EndDeferWindowPos (hdwp
)