::findwindow?vb findwindow sendkey?Delphi 中 FindWindow 和 Fin

你是否正在寻找关于findwindow的内容？让我把最俱价值的东西奉献给你：

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;

以上就是关于findwindow的全部内容，相信你一定会非常满意，。

本文来自电脑杂谈，转载请注明本文网址：
https://www.pc-fly.com/a/ruanjian/article-15452-1.html