Завершение приложения

[ben95]

Сообщение от AidarBik

Так он отправляет это сообщение главной форме, а ben95 - текущей. Она не обязательно главная, поэтому приложение не обязательно закроется.

ну почимо если на глвной фороме разместить бутон1 и прописать клосе то при клике бутон на главной форме закроется всё приложение
я всё это взял из книги библия дельфий Фленова

[Ins]

Так он отправляет это сообщение главной форме, а ben95 - текущей.

А, в этом смысле имелось в виду... Все равно тогда не ясно, почему не
Application.MainForm.Close, зачем извращаться над псевдопосылкой сообщения, чем это принципиально отличается, кроме как количеством букав

ben95, при закрытии главной формы - приложение завершится, с этим никто не спорит, но именно главной формы, а не любой. И написано это не в Библии Дельфи, а в более авторитетном источнике - исходниках VCL:

procedure TCustomForm.Close;
var
  CloseAction: TCloseAction;
begin
  if fsModal in FFormState then
    ModalResult := mrCancel
  else
    if CloseQuery then
    begin
      if FormStyle = fsMDIChild then
        if biMinimize in BorderIcons then
          CloseAction := caMinimize else
          CloseAction := caNone
      else
        CloseAction := caHide;
      DoClose(CloseAction);
      if CloseAction <> caNone then
        if Application.MainForm = Self then Application.Terminate   // <-- здесь
        else if CloseAction = caHide then Hide
        else if CloseAction = caMinimize then WindowState := wsMinimized
        else Release;
    end;
end;

[AidarBik]

Еще один способ - PostQuitMessage(0);

[BOBAH13]

Просто почему я вписал такой метод, потому что большенство присутствующих методов обрывают то процесс или получения сообщений )) таким образом возможен не корректный выход программы и соответственно не срабатывание некоторых событий форм.

[Ins]

Вообще, строго говоря, хоть способов и много, но они между собой отличаются, и выбрать тот или другой нужно в зависимости от ситуации:

1. ExitProcess или TerminateProcess самое "грубое" завершение. Процесс немедленно завершается, никакая финализация не производится, никаких возможностей прервать завершение процесса либо сохранить данные после вызова нет.
2. Halt - чуть более мягкое завершение. Перед завершением выполняется финализационный код юнитов, также вызывается ExitProc.
3. PostQuitMessage - еще более мягкое. Сообщение о завершении кладется в очередь, но выполнение кода не прерывается, он продолжает выполнение с того же места. Перед закрытием обрабатываются все сообщения из очереди (кроме очереди виртуального ввода, сообщений WM_PAINT и WM_TIMER из-за их низкого приоритета) и вызывается Halt
4. Application.Terminate - еще мягче. Вызывается CallTerminateProcs, затем - PostQuitMessage. При этом есть возможность прервать завершение процесса из одной из TerminateProcs, вернув в ней False, а также выполнить некоторые действия.
5. Закрытие главной формы - еще мягче. Есть возможность прервать закрытие из обработчика OnCloseQuery и выполнить очистку/сохранение результатов. Если закрытие разрешено - вызывается Application.Terminate

[Jeni]

Ну надо же, какое бурное обсуждение простого вопроса! Кстати, вопрос был о завершении приложения, которое может быть и просто консольным, без всяких форм.

Ins, огромное спасибо за подробности.

[AidarBik]

Если консольное, то Exit.