forum.boolean.name - Работа с чужими окнами

forum.boolean.name (http://forum.boolean.name/index.php)

- Delphi (http://forum.boolean.name/forumdisplay.php?f=66)

- - Работа с чужими окнами (http://forum.boolean.name/showthread.php?t=13024)

Работа с чужими окнами

В приложении есть Edit я знаю его Handle класс окна и Handle окна родителя , заголовка окна нет.
Как получить текст из edit?

Ответ: Работа с чужими окнами

После длительного гемороя Все получилось
пример тут

PHP код:




var 
  h,sh,g: integer; 
label 
   m2; 
begin 
  m2: 
  application.ShowMainForm:=false; 
  sleep(10); 
  h:=FindWindow('#32770',nil); 
  If h > 0 then 
  sh:=FindWindowEx(h,0,'Static',nil); 
  g:= findwindowex(h,sh,'Static',nil); 
  SendMessage(g,WM_SETTEXT,0,lparam(LPCTSTR(' Свой текст  ')));// меняем текст в окне 
  SetWindowText(FindWindow('#32770',Nil), 'Свой текст'); // меняем заголовок окна 
 
if h = 0 then 
Goto m2; 
sleep(1000); 
application.ProcessMessages; 
exitprocess(0); 
end; 
end.