队长模块悬浮跟随窗口

.如果 (前台句柄 ＝ 浏览器窗口句柄)
.如果真 (是否激活 ＝ 假)
.如果真 (_启动窗口.可视 ＝ 假)
_启动窗口.可视 ＝ 真
.如果真结束
_启动窗口.总在最前 ＝ 真
窗口_置状态 (程序窗口句柄, 1)
' SetWindowPos (自身句柄, #HWND_TOP, 0, 0, 0, 0, 位或 (#SWP_NOMOVE, #SWP_NOSIZE, #SWP_NOACTIVATE)) ' 使窗口至于最底层且不激活
.如果真结束
是否激活 ＝ 真
.否则
.如果 (IsWindowVisible (浏览器窗口句柄) ＝ 真)
.否则
.如果 (是否激活 ＝ 真)
SetWindowPos (程序窗口句柄, 1, 0, 0, 0, 0, 位或 (2, 1, 16)) ' 使窗口至于最底层且不激活
.否则
' _启动窗口.可视 ＝ 假
.如果结束
是否激活 ＝ 假