码迷,mamicode.com
首页 > Windows程序 > 详细

WinAPI: FindWindow、FindWindowEx - 查找窗口

时间:2014-08-14 23:22:46      阅读:525      评论:0      收藏:0      [点我收藏+]

标签:style   color   os   strong   for   ar   window   on   

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;

WinAPI: FindWindow、FindWindowEx - 查找窗口,布布扣,bubuko.com

WinAPI: FindWindow、FindWindowEx - 查找窗口

标签:style   color   os   strong   for   ar   window   on   

原文地址:http://www.cnblogs.com/zhaoxinshanwei/p/3913420.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!