[arach]

Как я понимаю, можно сделать так:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  h1, h2: hwnd;
begin
  h1 := FindWindow(nil, 'Имя_Окна');
  h2 := FindWindowEx(h1, 0, 'TButton', 'Кнопка');
 // SendMessage(h2, BM_CLICK, 0, 0);
 showmessage(inttostr(h2));
 end;

Admin: Пользуемся тегами!

Но окна могут находиться в различных позициях. К тому же имя окон одинаково. Необходимо каким-либо образом использовать путь к файлу.