[ИльяК]

angvelem, идею получения хендла окна я брал с этой темы.

Использую функцию

Код:

function GetSubChild(wd: HWnd):HWnd;
Var 
  Cw:HWnd;
Begin
  Result:=0;
  If WD=0 then Exit;
  Cw := FindWindowEx(Wd, 0, nil, nil);
  while (Cw <> 0) do
    begin
       Result:=cw;
       GetSubChild(Cw);
       Cw := FindWindowEx(Wd, Cw, nil, nil);
     End;
end;

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

Сообщение от angvelem

пиши так:
Код:
SetWindowText(wnd, PChar(s));

Попробовал, почему-то перестало передавать текст даже если окно не свёрнуто/перекрыто.