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

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

Как закрыть при выходе из одного приложения другое? [D7, XP]

Dimon777 ©   (2007-04-25 11:35:00) 

Есть два приложения, написанные в Delphi.
В одном, для удобства, есть кнопка вызова другого:

private
hand:HWND;
...
procedure Tform1.button1Click(Sender: TObject);
begin
Hand := Winexec('c:\Name2.exe', sw_show);
//или так проще
WinExec('c:\name2.exe', SW_SHOW);
end;

Вопрос: Как при закрытии первого (так сказать "главного") приложения закрыть второе?

---

Dimon777   (2007-04-25 12:42:00) [1]

Да, работает, спасибо!

---

alles   (2007-04-25 11:49:00) [2]

в OnClose аин формы находишь хандл окна 2-го exe(FindWindow). Потом посылашь SendMessage с параметром WM_CLOSE этой форме

---

Rial   (2007-04-25 11:42:00) [3]

SendMessage(hWnd, WM_CLOSE, 0, 0);
hWnd - находится из заголовка и класса окна.
Т.к. оба приложения твои - то и значения эти для тебя програчны.

Если что то не устроило, можно поробовать
TerminateProcess, WM_QUIT... и т.п. :))

---

Наверх