4

如何在 Delphi 中找到窗口句柄的屏幕相对位置?(X,Y)

4

3 回答 3

6

使用 FindWindow() 检索窗口句柄,并使用 GetWindowRect() 获取坐标:

var 
 NotepadHandle: hwnd;
 WindowRect: TRect;
begin
 NotepadHandle := FindWindow(nil, 'Untitled - Notepad');

 if NotepadHandle <> 0 then
   GetWindowRect(NotepadHandle, WindowRect)

end;
于 2011-04-25T13:32:54.790 回答
5

尝试使用该GetWindowRect功能

var
  lpRect: TRect;
begin
   GetWindowRect(Edit1.Handle,lpRect);  
   ShowMessage(Format('%d,%d',[lpRect.Left,lpRect.Top]));
end;
于 2011-04-25T13:28:05.810 回答
1

请记住,如果窗口(应用程序)被最小化,你会得到一些像这样的 Rect 值(-32000, -32000, -31840, -31972, (-32000, -32000), (-31840, -31972))

于 2019-10-03T12:34:19.583 回答