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

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

Отследить появление окна [D7, XP]

Первакласник Вася ©   (2007-04-06 21:13:00) 

Здравствуйте!

Подскажите пожалуйста как можно проверить что запущено окно Internet Explorer?

---

palva   (2007-04-07 22:35:00) [1]

function fn(Hwnd: THandle; Param: Pointer): Boolean; stdcall;
var s: String;
len: Integer;
begin
 len := GetWindowTextLength(Hwnd);
 if len > 0 then begin
   SetLength(s, len);
   GetWindowText(Hwnd, PChar(s), len+1);
   if Copy(s, 1, 14) = 'Мастера DELPHI' then begin
     Form1.ListBox1.Items.Add(s);
   end;
 end;
 Result := True;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 EnumWindows(@fn, 0);
end;


---

Первакласник Вася   (2007-04-07 21:05:00) [2]

:((

Хорошо! Подойду к вопросу несколько иначе.
Мне нужно проверить, запущен ли обозреватель с заголовком "Maстера DELPHI".
Я поступаю следующим образом:


if findwindow('IEFrame','Maстера DELPHI')<>0 then
действие 1 иначе действие 2.


Пробовал много разных вариантов, но результат отрицательный :(
Подскажите плиз, куда копать-то?

---

homm   (2007-04-07 20:35:00) [3]

> Отследить появление окна

> как можно проверить что запущено окно Internet Explorer?

Это две большие разницы. Подсказака: Первое сложнее в разы.

---

Virgo_Style   (2007-04-07 20:33:00) [4]

FindWindow ?

---

Первакласник Вася   (2007-04-07 20:16:00) [5]

Здрасте!

Неужели никто не может подсказать?

---

Наверх