Форум: "Начинающим";
Текущий архив: 2006.12.31;
Скачать: [xml.tar.bz2];

Вниз

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

← →
lobach ©   (2006-12-10 20:35) [0]

Здравствуйте, подскажите как отследить запуск приложения, если известен заголовок окна?

---

← →
Kostafey ©   (2006-12-10 23:34) [1]

Что имеется в виду под заголовком окна ?
Если известно название типа главного окна то, наверное что-то вроде того:


procedure TForm1.Timer1Timer(Sender: TObject);
var
H : HWND; // ссылка на окно
begin
H := FindWindow ("TForm1", "Form1"); // ищем окно
If H <> 0 then ShowMessage ("Есть Form1!") // окно найдено
else ShowMessage ("Нет Form1!") // окно не найдено
end;


---

← →
antonn ©   (2006-12-11 00:13) [2]

Kostafey ©   (10.12.06 23:34) [1]
If H <> 0 then ShowMessage ("Есть Form1!") // окно найдено
else ShowMessage ("Нет Form1!") // окно не найдено
жестокий пример:)

---

← →
Kostafey ©   (2006-12-11 00:19) [3]

> жестокий пример:)

:)
це: М. Краснов "OpenGL. Графика в проектах Delphi"

---

← →
RASkov   (2006-12-11 00:32) [4]

> [2] antonn ©   (11.12.06 00:13)

И Interval как можно меньше...Получится игрулина "успей закрыть все мессаги"

> [0] lobach ©   (10.12.06 20:35)

Подумай над [1]. Без ShowMessage может, что и выйдет

---

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

Форум: "Начинающим";
Текущий архив: 2006.12.31;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.056 c