|
记得在上学的时候自己一人买了台机器可是其他同学总会抢我的电脑上QQ聊天于是自己编了个小程序只要这个程序运行则别的同学一打开QQ的登录如果把鼠标放到登录窗体的话窗体自动关闭！其实这个功能用Delphi或者C++ Builder来实现是很简单的以下我用Delphi原代码来说明 在Delphi中新建一个Project在Form上添加一个Timer设置Interval为ms然后编写下面的代码即可 procedure TFormTimerTimer(Sender: TObject); var handlehchildhchild:THandle; point:TPoint; temp:array[] of char; begin ://取得当前鼠标的位置 GetCursorPos(point); //取得当前鼠标所在窗体的句柄 handle:=WindowFromPoint(point); GetClassName(handletemp); //#是对话框的类名QQ窗体的类名就是# if temp=# then begin //为了确保是QQ登陆窗体再检查有没有登陆和注册向导两个按扭 hchild:=FindWindowEx(handleButton登录); hchild:=FindWindowEx(handleButton注册向导); if (hchild<>) and (hchild<>) then SendMessage(handleWM_CLOSE); end; end; 呵呵！ 很简单吧！要注意的是QQ窗体的QQ用户登陆这个标题是画上去的不能简单的用FindWindow（窗体句柄QQ用户登陆）来判断 |
