Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];




Вниз

Как достать заголовки всех открытых окон Intenet Explorer? 


Schummmi   (2002-02-09 08:11) [0]

Уважаемые Мастера! Как достать заголовки всех открытых окон Intenet Explorer? Спасибо!



Victor   (2002-02-09 10:22) [1]

Можно поподробней достать с какой целью, например чтобы достать заголовок Internet Explorer с целью закрытия надо писать
sendmessage(findwindow(nil,"заголовок окна которое надо достать"),wm_syscommand,sc_close,0);



Schummi   (2002-02-09 13:29) [2]

Мне надо просто в TListBox получить список заголовков всех открытых окон Intenet Explorer.



rambo69   (2002-02-09 16:37) [3]

procedure sbor;
var Wnd : hWnd;
buff: array [0..127] of char;
str:string;
begin
LIST1.CLEAR;
str:="Microsoft Internet Explorer";
Wnd := GetWindow(chatform.Handle, gw_HWndFirst);
while Wnd <> 0 do begin {Не показываем:}
if IsWindowVisible(Wnd) and {-Невидимые окна}
(GetWindow(Wnd, gw_Owner) = 0) and {-Дочернии окна}
(GetWindowText(Wnd, buff, sizeof(buff)) <> 0) {-Окна без заголовков}
then begin
GetWindowText(Wnd, buff, sizeof(buff));
if pos(str,StrPas(buff))>0
then list1.items.add(StrPas(buff));
end;
Wnd := GetWindow(Wnd, gw_hWndNext);
end;
end;



Schummmi   (2002-02-16 09:34) [4]

А что, если с помощью WInBoost"а пользователь, например я, убрал в строке заголовка Internet Explorer"а строку "Microsoft Internet Explorer"??? Тогда как быть?



Anonymous   (2002-02-16 10:10) [5]

Q176792 HOWTO: Connect to a Running Instance of Internet Explorer
http://support.microsoft.com/support/kb/articles/Q176/7/92.asp




[NIKEL]   (2002-02-16 12:48) [6]

или ищи в названиях класса окна у IE он по моему IEFrame называеться....



Schummi   (2002-02-23 08:20) [7]

А как это в названиях класса окна? Я не знаю!



Cobalt   (2002-02-23 12:45) [8]

Мой вариант (очень похож на [NIKEL] © (16.02.02 12:48))
С помощью получаешь хэндл процесса с именем IExplorer.exe (чтоб наверняка), и проходишься по его окнам (EnumProcessWindow или что-то в этом роде, точнее см хелп)



[NIKEL]   (2002-02-23 17:59) [9]

>>Schummi
примерно так (я уже это писал здесь в форуме неоднократно)
крути цикл по всем окнам и смотри в их Класс name
if ((GetClassName(hwd,&buf,255) > 0) && (buf[0] == "I") && (buf[1] == "E") && (buf[6]== "e") //нашли IEFrame
{
... чё то делаем
}



Serg001   (2002-02-23 18:35) [10]

Да, класс окна IExplorer - IEFrame



Schummi   (2002-02-24 08:06) [11]

Спасибо тебе, [NIKEL], и спасибо всем! Попробую!




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.73 MB
Время: 0.023 c
3-94297           Yuraz                 2002-04-06 15:53  2002.04.29  
Ребят, кто писал базу для магазина, нужна организация таблиц


4-94614           ebeden                2002-02-23 01:51  2002.04.29  
Перехват нажатий клавиш


4-94610           MARcoDEN              2002-02-19 20:20  2002.04.29  
Аналог функции ExtractFileName


6-94529           fixxxer               2002-02-14 18:28  2002.04.29  
Как получить список компьютеров в локальной сети


1-94418           Stan Orlov            2002-04-18 09:06  2002.04.29  
Как выделить весь текст в RichEdit или Memo?