Захват текста ошибки в другой программе

[Человек_Борща]

Привет всем! Вот интерестно, можно ли захватить текст отшибки которая выскочила в другой программе?

Заголовок точно можно и это с помощью FindWindow , а как захватить текст ошибки?

Вопрос на туже тематику какие отличия у разновидностей FindWindow'а?
Имеется вот эти:
FindWindowA
FindWindowW
FindWindowEx
FindWindowExA
FindWindowExW

[BOBAH13]

Вопрос на туже тематику какие отличия у разновидностей FindWindow'а?

Про MSDN слышали?

[Человек_Борща]

Можно ссылку на справочник msdn? заколебаюсь искать его=)(Уже искал)

[JDredd]

var
  Wnd : hWnd;
  buff : array[0.. 127] of Char;
begin
  ...
  GetWindowText (Wnd, buff, sizeof (buff ));
  MessageDlg('Title: '  + StrPas (buff), mtWarning, [mbOk], 0);  
end;

Wnd - можно получить через EnumChildWindows
http://www.google.com/search?q=EnumChildWindows+delphi

[bitSoft]

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

		char title[500];
		HWND ptr = WindowFromPoint(coord);
		GetWindowText(ptr, title, sizeof(title)/sizeof(title[0]));

coord - координаты точки над текстом ошибки

Daleko ti...

[BOBAH13]

Сообщение от Человек_Борща

Можно ссылку на справочник msdn? заколебаюсь искать его=)(Уже искал)

Ооо да, уже верю!

http://www.google.com/search?q=FindWindow

[Человек_Борща]

[QUOTE=JDredd;599374]

var
  Wnd : hWnd;
  buff : array[0.. 127] of Char;
begin
  ...
  GetWindowText (Wnd, buff, sizeof (buff ));
  MessageDlg('Title: '  + StrPas (buff), mtWarning, [mbOk], 0);  
end;

я получаю HWND вот так:

  HM: HWND;
begin
  for i := 0 to Count - 1 do
    if ErrWindows[i].ErrorCaption <> '' then
    begin
      HM := FindWindow(nil, PChar(ErrWindows[i].ErrorCaption));
      if HM <> 0 then
      begin

Всем спасибо, проблема решена=) Спасибо Jeedd

[evg_m]

Можно ссылку на справочник msdn? заколебаюсь искать его=)(Уже искал)

M icrosoft
S oftware
D eveloper
N etwork

[GunSmoker]

Учить мат-часть.