Delphi:如何访问其他应用程序的控件？

Question

我想"查看"另一个应用程序显示的信息,并"单击"不同的按钮以自动执行一个过程.从来没有这样做,并希望任何关于从哪里开始和/或链接的建议.

Answer 1

对于某些人,SendMessage()您可以模拟用户与您希望的任何程序进行交互.这是所有"自动点击"或宏程序的核心.

WinSight(Borland\Delphi7\Bin\WS32.EXE)可能对获取要使用的东西ID非常有帮助SendMessage().你还必须使用FindWindow().

Answer 2

您可以使用WinDowse(免费软件)获取有关任何窗口的必要技术信息.

此示例显示如何使用x,y坐标模拟单击按钮

Procedure PressButtonXY(handleWnd : HWND;X,Y : Integer);   //X,Y are relative to the client area, you can use ScreenToClient to obtain this.
var
LParam    : Integer;
begin
LParam    := MakeLong(X, Y);
PostMessage(handleWnd, WM_LBUTTONDOWN, MK_LBUTTON, LParam);
PostMessage(handleWnd, WM_LBUTTONUP, MK_LBUTTON, LParam);
end;