如何用delphi得到指定窗口的坐标

Posted 2023-04-15

我想用Delphi得到指定窗口的坐标,只要我输入窗口的标题,没有分了,希望高手可怜一下我,发个源码,十分感激!!

GetClientRect

[编辑本段]函数功能
该函数获取窗口客户区的坐标。客户区坐标指定客户区的左上角和右下角。由于客户区坐标是相对子窗口客户区的左上角而言的，因此左上角坐标为（0，0）
[编辑本段]函数原型
在Win32 SDK, 该API函数原型为 BOOL GetClientRect( HWND hWnd, // 窗口句柄 LPRECT lpRect // 客户区坐标 ); 在MFC中，该函数的原型为void GetClientRect(LPRECT lpRect) const;
[编辑本段]参数
hWnd [输入]是程序窗口的句柄。 lpRect [输出]是一个指针，指向一个RECT类型的rectangle结构。该结构有四个LONG字段,分别为left、top、right和bottom。GetClientRect将这四个字段设定为窗口显示区域的尺寸。left和top字段通常设定为0。right和bottom字段设定为显示区域的宽度和高度（像素点数）。
[编辑本段]返回值
如果函数成功，返回一个非零值。 如果函数失败，返回零。要得到更多的错误信息，请使用GetLastError函数。

参考资料：http://baike.baidu.com/view/1005019.htm?fr=ala0_1_1

参考技术A //edit1用来输入窗口标题

var
h :THandle;
r :TRect;
begin
h := FindWindow(nil,PChar(Edit1.Text));
if h <> 0 then
begin
GetWindowRect(h,r);
ShowMessage(IntToStr(r.Left));
ShowMessage(IntToStr(r.Top));
end;
end;本回答被提问者采纳

如何用delphi打开pas文件

先用delphi打开.pas文件，打开前记得关掉默认打开的工程，然后点工程，添加工程，再选你这个pas，就可以编译运行了！ 参考技术A delphi的pas文件是文本文件，File--open 就打开了，