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

← →
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 этой форме

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

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