| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как получить текст строки состояния активного окна? [D6, D7, WinXP]

Volf_555 ©   (2005-11-13 00:24:00) 

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

---

Brother   (2005-11-16 08:36:00) [1]

Ясень пень не пашет

Вместо
> 'about:blank - Microsoft Internet Explorer'
надо писать текущий кэпшен окна

---

Volf_555   (2005-11-16 00:56:00) [2]

Не пашет

---

Delphi_is_cool   (2005-11-14 02:00:00) [3]


function GetIEStatusText : String;
var
 hIE, hStatus: HWND;
begin
 hIE := FindWindow(nil, 'about:blank - Microsoft Internet Explorer');
 hStatus := FindWindowEx(hIE, 0, 'msctls_statusbar32', nil);
 SetLength(Result, SendMessage(hStatus, WM_GETTEXTLENGTH, 0, 0) + 1);
 SendMessage(hStatus, WM_GETTEXT, Length(Result), lParam(Result));
end;

Оно ? )

---

Наверх