Выход из модального окна

← →
Реактор © (2004-05-06 22:53) [0]

Из основной формы создаю модальное окно MyWindow.ShowModal, обрабатываю MyWindow.FormActivate, а вот закрыть потом это модальное окно получается только нажав мышкой на "крестик". MyWindow.Hide (так же как и Free, Destroy) закрывает окно, но не возвращает управление основной форме. Что надо написать в процедуре MyWindow.FormActivate, что бы это было аналогично нажатию мышкой на "крестик" модального окна?
Решение вопроса через MyWindow.Show мне не подходит.

← →
Mim1 © (2004-05-06 22:56) [1]

Release, sendmessage(handle,wm_syscommand,sc_close,0), modalresult := mr_cancel

← →
yanis © (2004-05-06 22:57) [2]

MyWindow.Close;

← →
Rouse_ © (2004-05-06 22:59) [3]

ModalResult

> Из основной формы создаю модальное окно MyWindow.ShowModal

обычно в модальном окне предусматриваются кнопки с ModalResult и со стандартной реакцией на клавиатуру.

> Что надо написать в процедуре MyWindow.FormActivate

Ничего.

Вопрос наводящий: а что должно делать это модальное окно (зачем ты его создаешь) ?

Выход из модального окна Найти похожие ветки