Закрытие основного процесса через dll

[godlsd]

Есть основной модуль, перед отображением основной формы вызывается функция из dll, которая создаёт модальное(если не ошибаюсь - модальное, не закрыв которого, не получишь доступ к основному), это окошко представляет собой форму для подключения к серверу, меня волнует два вопроса связанных с закрытием программы. На форме подключения(которая создаётся dll-ой) есть кнопка закрытия программы (системные кнопочки убраны), если я добавляю PostQuitMessage или Application.Terminate, то закрывается форма подключения, а основная форма - нет. Но если я добавлю тоже самое в эвент OnCloseQuery, то главная форма закрывается.
Вопрос 1:
Как совершить полноценное закрітие программі через Button.
Вопрос 2:
Как избежать полу секундного отображения главной формы, перед полным закрытием программы? (это происходит при Application.Terminate на onCloseQuery.

[GunSmoker]

Почему бы просто не вернуть управление из функции, указав, что пользователь указал закрытие приложения? А уж вызывающий сам разберётся, как ему лучше закрываться. Может я вашу DLL из консольной программы вызываю?

Насчёт задержки - я не вижу, откуда она у вас возникает. По-хорошему, её надо бы исправлять, если это возможно. На худой конец - скрыть форму (Hide) перед закрытием.

[godlsd]

Есть проблема, как я поменяю свойство Hide основной формы, если я её не вижу из dll'ки, В C++, например, можно передать handle основного модуля и закрыть/скрыть его (модуль), а здесь как?

[GunSmoker]

Ну и здесь вы можете передать или саму форму (объект) или дескиптор окна. Но вопрос не в этом. Зачем вам вообще передавать форму и скрывать её? Что если я вызываю вашу DLL из консольной программы? У меня и окна-то никакого нет.

[godlsd]

Ок, закрою я приложение, в зависимости от того что ткнет User, вопрос второй, как же всё таки правильно передать Handle формы, чтобы скрыть её? Было бы хорошо с примером кода... Буду очень признателен!

[Stilet]

godlsd

В DLL процедурой вызывается модальное окно так? Оно вызывается методом ShowModal так? Сама ShowModal является функцией возвращающей модальный результат. Таким образом опиши функцию в ДЛЛ

function Okno:TModalResult;
begin
 ...
 Result:=Форма.ShowModal;
 ...
end;

Далее на этой модальной форме ты по кнопкам что-то выполняешь и закрываешь, так?
Тогда в кликах кнопок пиши

 ModalResult:=mrOk;// Это для кнопки Окей
 ...
 ModalResult:=mrCancel;// Это для кнопки отмены

эти строки закроют окно вернув указанные тобой результат модальности, который вернет функция okno твоей проге и:

 if okno=mrCancel then Application.Terminate

т.е. завершай прогу при возвращении Cancel результата из модального окна.
Ферштеен?

[godlsd]

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

[GunSmoker]

Опять вы за своё.

Ну не надо вам в ShowModal закрывать главную форму! Не надо. Вам уже три раза сказали (два - я, один - Stilet). Вы "да-да, понятно" - и заново: "а закрыть-то как"?

Вы лучше скажите, что непонятно-то?

[godlsd]

Наверное вы что-то не до поняли, что бы вернуть результат главной форме, надо схлопнуть модальное окно, иначе не произойдет возврат из функции. В итоге, как только схлопывается модальное окно, тут же отображается главное, и пока дойдёт до обработки результата модального окна, оно светится, вот так. Может конечно я чего-то не допераю...
Объясните пожалуйста!

[GunSmoker]

А, теперь понятно.

Правда, не понятно ( ) при этом, откуда у вас эта задержка? Модальное окно закрывается мгновенно. Функция возвращает результат тоже мгновенно. Соответственно, главное приложение (с главным окном) реагирует тоже мгновенно:

if okno = mrCancel then  // 1
begin
  Application.MainForm.Hide;      // 2
  Application.Terminate;
end;

Между пунктами 1 и 2 вроде как нет никаких препятствий. Откуда тогда у вас задержка?