如果有两个程序，请原谅我的无知[求助]

Question

啊,请恕我也无知.
Listen.......

Answer 1

windows 下可以这样做的吗?访问别的程序使用的内存空间会出现错误的吧

Answer 2

可以做的，首先先找到这个程序，然后在遍历他的组件找到你想要的那个组件然后给他发个消息就可以了，这样做其实不是很安全的，你还可以通过IPC来自己定义消息来触发FORM1。BUTTON的CLICK事件，

Answer 3

首先得到目标窗口的HANDLE，然后用GetChildWindow找他的子窗口，判断是什么STYLE，要知道，BUTTON也是窗口，也有HANDLE要实现点击，SENDMESSAGE（HANDLE，WM_MOUSEDOWN, ...)就可以了。

Answer 4

给你一个我的函数procedure clickbutton(wincap:string;cclass:string;ccap:string);
var
  whwnd,chwnd:thandle;
begin
  try
    whwnd:=findwindow(nil,pchar(wincap));
    chwnd:=findwindowEX(whwnd,0,pchar(cclass),pchar(ccap));
    sendmessage(chwnd,bm_click,0,0);
  except
    exit;
  end;
end;调用时你可以这样写
clickbutton('form1','Tbutton','确定');
可以模拟点击 form1 中的 caption 为'确定'的tbutton慢慢玩吧

Answer 5

用GetChildWindow FindWindow 等API遍历form1只能找到所以是窗口，有handle的控件，如button等，但入label等非窗口控件就无能为力了