Long Р其中参数hDC是窗口的设备场景句柄。三个(X,Y)和CreateRoundRectRgn的是一样的,分别为左上角,右下角坐标和圆角大小。Р====== Р获取本程序活动窗口的句柄:GetActiveWindow函数Р声明: РDeclare Function GetActiveWindow Lib "user32"() As Long Р很简单,函数返回值为当前本程序活动窗口句柄。调用如:x=GetActiveWindow,这个函数不如GetForegroundWindow函数,建议用下面的: Р---- Р获取屏幕上当前活动窗口的句柄:GetForegroundWindow函数Р这个函数功能更强大,能获取前台应用程序的活动窗口句柄。声明: РDeclare Function GetForegroundWindow Lib "user32" () As Long Р函数返回值为当前屏幕上活动窗口的句柄,如:x=GetForegroundWindow。Р----- Р判断一个窗口是否是活动窗口:IsWindowEnabled函数Р声明: РDeclare Function IsWindowEnabled Lib "user32"(ByVal hwnd As Long) As Long Р参数hwnd是待检测窗口句柄。Р调用如:x=IsWindowEnabled(Form1.hwnd),函数返回值若非0表示为活动窗口,返回0表示为失效窗口。Р---- Р禁止任务条--任务条所属窗口类为"Shell_traywnd",用FindWindowA函数去查,如下: TaskBarhWnd = FindWindowA("Shell_traywnd", ""),然后用EnableWindow函数: lxn = EnableWindow(TaskBarhWnd,0)就可以了。