2,748
社区成员
发帖
与我相关
我的任务
分享在你的表单上加一个 Timer 控件,
此控件的 Interval 属性为100,Enabled 属性为 .T.
此控件的 Init 事件代码为:
Declare Integer GetForegroundWindow In user32
此控件的 Timer 事件代码为:
If GetForegroundWindow()=Thisform.HWnd
Thisform.Caption="前台"
Else
Thisform.Caption="后台"
Endif然后你运行程序试一下吧