//声明: GetWindowText( hWnd: HWND; {窗口句柄} lpString: PChar; {接收文本的缓冲区的指针} nMaxCount: Integer {指定缓冲区大小, 其中包含NULL字符; 如果文本超出,会被被截断} ): Integer; {返回字符个数, 不包括中断的空字符; 如果标题为空或句柄无效, 则返回零}
//举例: var arr: array[0..254] of Char; begin GetWindowText(Handle, @arr, SizeOf(arr)); ShowMessage(arr); {Form1} end;
//标题文本个数: var arr: array[0..254] of Char; num: Integer; begin num := GetWindowText(Handle, arr, SizeOf(arr)); ShowMessage(IntToStr(num)); {5} end;
本文主要跟大家介绍Delphi中获取其它进程的窗口句柄,在Delphi中获取其它进程的窗口句柄,绝大部分人首先想到的会使用:FindWindow或者用GetWindow来遍历查找,如:handle:=FindWindow(nil,PChar…
Delphi窗体函数GetWindowLong-获取指定窗口的信息原型:LongGetWindowLong(HWNDhWnd,intnlndex);参数:hWnd目标窗口句柄,间接指向其窗口类。nlndex若指定值大于0,返回窗口内存中指定…
GetForegroundWindow函数获取一个前台窗口的句柄(用户当前工作的窗口)。函数原型:HWNDGetForegroundWindow(void);参数:无返回值:一个前台窗口的句柄。在某些情况下,如一个窗口失去激活时,前台窗口可…
FindWindow(lpClassName,{窗口的类名}lpWindowName:PChar{窗口的标题}):HWND;{返回窗口的句柄;失败返回0}//FindWindowEx比FindWindow多出两个句柄参数:FindWindo…
unitUnit2;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,ExtCtrls;type…
unitHKProc;interfaceusesWindows,Messages,Dialogs,iniFiles,SysUtils;varhNextHookProc:HHook;procSaveExit:Pointer;functionC…
用我的方法来控制其他程序窗体上的窗口控件,必须先了解什么是回调函数。我的理解是这样的:回调函数写出来不是自己的程序去调用的,反而是让其他的东西去调用,比如windows操作系统,比如其他的程序等等之类的。但是什么时候被调用却不知道了。回调函…
procedureTForm12.Button2Click(Sender:TObject);varmystring:PChar;beginGetMem(mystring,1024);GetWindowText(Button1.Handle,…