首页 > 代码库 > WinAPI: FindWindow、FindWindowEx - 查找窗口
WinAPI: FindWindow、FindWindowEx - 查找窗口
FindWindow( lpClassName, {窗口的类名} lpWindowName: PChar {窗口的标题}): HWND; {返回窗口的句柄; 失败返回 0}//FindWindowEx 比 FindWindow 多出两个句柄参数:FindWindowEx( Parent: HWND; {要查找子窗口的父窗口句柄} Child: HWND; {子窗口句柄} ClassName: PChar; {} WindowName: PChar {}): HWND;{如果 Parent 是 0, 则函数以桌面窗口为父窗口, 查找桌面窗口的所有子窗口;如果 是 HWND_MESSAGE, 函数仅查找所有消息窗口;子窗口必须是 Parent 窗口的直接子窗口;如果 Child 是 0, 查找从 Parent 的第一个子窗口开始;如果 Parent 和 Child 同时是 0, 则函数查找所有的顶层窗口及消息窗口.}
//测试1: 试着找找新建程序主窗口的句柄var h: HWND;begin {现在我们知道窗口的标题是: Form1、窗口的类名是: TForm1} h := FindWindow(‘TForm1‘, ‘Form1‘); ShowMessage(IntToStr(h)); {656180; 这是随机, 每次启动窗口肯定不一样} {假如不知道类名} h := FindWindow(nil, ‘Form1‘); ShowMessage(IntToStr(h)); {656180} {假如不知道标题名} h := FindWindow(‘TForm1‘, nil); ShowMessage(IntToStr(h)); {656180} {其实这个窗口的句柄不就是 Self.Handle 吗} ShowMessage(IntToStr(Handle)); {656180}end;
//测试2: 找计算器窗口的句柄(先打开计算器)var h: HWND;begin {如果不是简体中文系统, 这样可能不灵} h := FindWindow(nil, ‘计算器‘); ShowMessage(IntToStr(h)); {1508334} {最好这样, 但你得提前知道计算器窗口的类名是: SciCalc} h := FindWindow(‘SciCalc‘, nil); ShowMessage(IntToStr(h)); {1508334}end;
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。