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

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

← →
Dimon777 ©   (2007-04-25 11:35) [0]

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

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

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

---

← →
Rial ©   (2007-04-25 11:42) [1]

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

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

---

← →
alles ©   (2007-04-25 11:49) [2]

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

---

← →
Dimon777 ©   (2007-04-25 12:42) [3]

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

---

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

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



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