| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Заголовок активного окна [D7, WinXP]
Engy © (2005-01-22 20:07:00)Как узнать хэндл и заголовок текущего активного окна(необязательно своего)?
DDA (2005-01-23 12:01:00) [1]А может кто-нибудь подскажет как узнать иконку активного окна
Dextor (2005-01-22 20:27:00) [2]ВОТ ТАК:
procedure GetActiveWindow;
var
Wnd: Hwnd;
TextLength: integer;
szText: Pointer;
begin
Wnd := GetForegroundWindow;
TextLength := SendMessage(Wnd, WM_GETTEXTLENGTH, 0, 0);
GetMem(szText, TextLength + 1);
try
SendMessage(Wnd, WM_GETTEXT, TextLength + 1, Integer(szText));
Ot := StrPas(szText);
finally
FreeMem(szText);
end;
end;
begin...end (2005-01-22 20:15:00) [3]> Engy © (22.01.05 20:07)
GetForegroundWindow, GetWindowText
| |
