![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Закрытие приложения [D6, WinXP]
webpauk © (2005-08-03 19:03:00)Пишу компонент.
Надо чтобы при нажатии на него закрылось приложение.
procedure WndProc(var Msg: TMessage);
begin
inherited;
case msg.Msg of
WM_LBUTTONDOWN:
begin
end;
end;
end;
SendMessage(???)
webpauk (2005-08-03 19:13:00) [1]
> Alexander Panov © (03.08.05 19:06) [3]
ОК
webpauk (2005-08-03 19:11:00) [2]только надо чтобы посылалось сообщение SC_CLOSE, как при обычном нажатии на кнопку закрытия.
SendMessage(application.Handle, WM_SysCommand, sc_CLOSE, 0);- не работает
webpauk (2005-08-03 19:06:00) [3]и как я до этого не додумался?
Alexander Panov (2005-08-03 19:06:00) [4]WM_CLOSE
И не Send, а PostMessage.
И не экземпляру твоего компонента, а главному окну.
Ega23 (2005-08-03 19:04:00) [5]application.Tesminate ?