Delphi 窗体函数GetWindowLong-获取指定窗口的信息

原型:Long GetWindowLong(HWND hWnd,int nlndex);

参数:

hWnd  目标窗口句柄,间接指向其窗口类。
nlndex  若指定值大于0,返回窗口内存中指定偏移量的32位值。
  也可指定以下值来获得其它数据:
  宏定义           常量   描述
  GWL_EXSTYLE      -20    获取扩展窗口样式
  GWL_HINSTANCE     -6     获取应用实例句柄
  GWL_HWNDPARENT     -8     获取所有者窗口句柄
  GWL_ID           -12      获取窗口ID
  GWL_STYLE        -16    获得窗口样式
  GWL_USERDATA      -21   获取用户设置的32位数据,其值默认为0
  GWL_WNDPROC      -4     获取窗口过程地址或句柄。必须使用CallWindowProc函数调用获取的窗口过程。

  hWnd参数为对话框句柄时,还可用下列值:
  宏定义       常量   描述
  DWL_DLGPROC    4    获取对话框过程地址或句柄。必须使用CallWindowProc函数来调用对话框过程。
  DWL_MSGRESULT  0    获取在对话框过程中某消息的返回值。
  DWL_USER      8    获取应用程序专用的额外信息,例如一个句柄或指针。

返回值:如果函数成功,返回值是所需的32位整型值;

原文地址:https://www.cnblogs.com/guorongtao/p/12191846.html

时间: 2024-10-30 05:57:44

Delphi 窗体函数GetWindowLong-获取指定窗口的信息的相关文章

WinAPI: GetClassName - 获取指定窗口的类名

WinAPI: GetClassName - 获取指定窗口的类名 //声明: GetClassName( hWnd: HWND; {指定窗口句柄} lpClassName: PChar; {缓冲区} nMaxCount: Integer {缓冲区大小} ): Integer; {返回类名大小; 失败返回 0} -------------------------------------------------------------------------------- //测试1: 新建一个工程

获取指定窗口内的文本

如何编程实现获取另一个程序里文本控件的内容? 除去利用Debug API调试程序下断点之类比较复杂的方法,我们还可以利用API函数轻松实现这样的功能. 1.定义这样的结构体存放进程信息 struct ProcessWindow { DWORD dwProcessId; HWND hwndWindow; }; 2.创建进程 //创建进程 if ( !CreateProcess( FileName,NULL,NULL,NULL,FALSE, 0,NULL,WorkPath,&si,&pi )

Delphi 窗体函数 ShowScrollBar 控制滚动条

API函数 函数来源:FUNCTION ulong ShowScrollBar(ulong hwnd,ulong wBar,ulong bShow) LIBRARY "user32.dll" constant long SB_HORZ = 0constant long SB_VERT = 1constant long SB_BOTH = 3ShowScrollBar(Handle(Memo1),SB_HORZ,0);//隐藏水平滚动条 ShowScrollBar(Handle(Memo

Delphi 一些函数解释

AdjustWindowRect 给定一种窗口样式,计算获得目标客户区矩形所需的窗口大小 AnyPopup 判断屏幕上是否存在任何弹出式窗口 ArrangeIconicWindows 排列一个父窗口的最小化子窗口 AttachThreadInput 连接线程输入函数 BeginDeferWindowPos 启动构建一系列新窗口位置的过程 BringWindowToTop 将指定的窗口带至窗口列表顶部 CascadeWindows 以层叠方式排列窗口 ChildWindowFromPoint 返回

字符串函数:获取个数,替换,除空格

--字符串函数--LEN():获取指定参数的字符个数select LEN('中华人民共和国')--CHARINDEX(所需要查询的字符串,源字符串,查询起始位置)-IndexOf().能够找到就返回从1开始的索引,如果不能找到就返回0select CHARINDEX('人民','中华人民共和国')select CHARINDEX('人 民','中华人民共和国')select CHARINDEX('人民','中华人民共和国',2)--UPPER ToUpper() LOWER()--ToLower

获取指定日期下个月份的第一天

MS SQL Server自定义函数,指定一个日期,获取该日期的下一个月的第一天函数. 获取指定日期下个月份的第一天

程序运行时间测试 - 使用系统函数 getrusage 获取程序运行时间

https://github.com/yaowenxu/Workplace/blob/master/timer/getrusagetimer.c 关键结构体: struct rusage { struct timeval ru_utime; /* user time used */ struct timeval ru_stime; /* system time used */ long ru_maxrss; /* max resident set size */ long ru_ixrss; /

函数用途:同一域名对应多个IP时,获取指定服务器的远程网页内容

<?php /************************ * 函数用途:同一域名对应多个IP时,获取指定服务器的远程网页内容 * 创建时间:2008-12-09 * 创建人:张宴(img.jb51.net) * 参数说明: * $ip 服务器的IP地址 * $host 服务器的host名称 * $url 服务器的URL地址(不含域名) * 返回值: * 获取到的远程网页内容 * false 访问远程网页失败 ************************/ function HttpVi

获取指定目录下的所有文件名,包括子目录函数

获取指定目录下所有文件名,这是一个一个目录遍历的方法: function TPathWatch.FList(ASourFile: string): TStrings; // 查找子目录 AStrings存放查找出路径, ASourceFile要查找的目录 var sour_path, sour_file: string; // 源路径,源文件名类型 TmpList: TStringList; FileRec, subFileRec: TSearchrec; i: Integer; begin R