Question

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

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

Answer 1

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函数。

Answer 2

//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;