Скачать: CL | DM;

Как определить что мое окно наверху?   Найти похожие ветки 

← →
leonidus   (2008-06-01 12:23) [0]

Необходимо понять, является ли окно моей программы активным в данный момент, т.е. работает ли с ним пользователь или оно перекрыто другими окнами, как это сделать?

---

← →
engine ©   (2008-06-01 12:29) [1]

procedure TForm1.FormActivate(Sender: TObject);
begin
 ShowMessage("Пользователь работает с программой");
end;

---

← →
{RASkov} ©   (2008-06-01 13:22) [2]

GetActiveWindow сравнивай с хэндлом своего окна. Равно - значит твое активно, нет... ну на нет и суда нет...

---

← →
{RASkov} ©   (2008-06-01 13:24) [3]

> ShowMessage("Пользователь работает с программой");

Не факт.... ни [1] ни [2] не факт :)

---

← →
leonidus   (2008-06-01 13:27) [4]

engine так не получается, FormActivate срабатывает только один раз при старте программы, и даже если я разворачиваю поверх моего окна окно другой программы и затем опять перехожу в окно моей, то FormActivate все равно не генерируется.

---

← →
{RASkov} ©   (2008-06-01 13:40) [5]

> [4] leonidus   (01.06.08 13:27)
> то FormActivate все равно не генерируется.

Оно генерируется только в пределах текущего приложения....
Тебе нужно смотреть на свойства OnActivate и OnDeactivate у TApplication"а...

---

← →
{RASkov} ©   (2008-06-01 13:40) [6]

> Тебе нужно смотреть на свойства OnActivate и OnDeactivate
> у TApplication"а...

Стоп... мыж в винапи :) См [2]

---

← →
engine ©   (2008-06-01 14:07) [7]

http://delphiworld.narod.ru/base/wm_activate.html

---

← →
Anatoly Podgoretsky ©   (2008-06-01 14:49) [8]

The GetForegroundWindow function returns the handle of the foreground window (the window with which the user is currently working).

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.022 c