怎么得到窗体按钮的坐标(x, y) ?

[骄傲青蛙]

注意, 是打开某个应用程序窗体, 上面有个按钮, 我想得到他的坐标

[s11ss]

var
p: TPoint;
begin
GetCursorPos(p);
WindowFromPoint(p);
Caption := IntToStr(p.X) + ' ' + IntToStr(p.Y);
end;

[s11ss]

要鼠标指着那按钮

[hjkto]

还要加一个timer
或者捕获按钮的单击事件

[dinoalex]

找到句柄后,利用GetWindowRect和GetClientRect来计算取得

[骄傲青蛙]

[Quote=引用 2 楼 s11ss 的回复:]
要鼠标指着那按钮
[/Quote]

窗口的大小会变, 按钮的位置会变 , 这个方法我想过, 行不通,

[骄傲青蛙]

[Quote=引用 4 楼 dinoalex 的回复:]
找到句柄后,利用GetWindowRect和GetClientRect来计算取得
[/Quote]

说实话, 找不到句柄, 一切都是空谈

[dinoalex]

SysListView32
210,112,1024,708
TButton
938,166,1013,191
SysListView32
210,112,1024,708
TButton
943,72,1018,97
Shell_TrayWnd
0,708,1024,768
SystemTray_Main
320,174,704,533
ToolbarWindow32
891,711,945,765
TButton
213,70,288,95

[骄傲青蛙]

[Quote=引用 7 楼 dinoalex 的回复:]
SysListView32
210,112,1024,708
TButton
938,166,1013,191
SysListView32
210,112,1024,708
TButton
943,72,1018,97
Shell_TrayWnd
0,708,1024,768
SystemTray_Main
320,174,704,533
ToolbarWindow32
891,711,945,765
TButton
213,70,288,95
[/Quote]

这是 ??

[xjq2003]

[Quote=引用 4 楼 dinoalex 的回复:]
找到句柄后,利用GetWindowRect和GetClientRect来计算取得
[/Quote]
好

[骄傲青蛙]

没有句柄, 没有话说.

[骄傲青蛙]

[Quote=引用 9 楼 xjq2003 的回复:]
引用 4 楼 dinoalex 的回复:
找到句柄后,利用GetWindowRect和GetClientRect来计算取得

好
[/Quote]

有什么好的? 看六楼

[Seamour]

[Quote=引用 6 楼 coolesting 的回复:]
说实话, 找不到句柄, 一切都是空谈
[/Quote]
这不废话么，自己没句柄还取个屁啊，你一想“我要按钮”，计算机就自动给你个按钮啊？