ModalResult

← →
Grihan (2004-02-17 17:53) [0]

Здравствуйте.
Кто-нибудь может сказать причину не срабатывания ModalResult?
Дело обстоит следующим образом:
Естественно вызываю ShowModal, далее по клику одной из кнопок:

...
ModalResult := mrOk;
...

по идее после указанной строки форма должна закрыться, или идея в корне не верна, хотя я экспериментировал и с Exit после строки и Close и Close+Exit - безрезультатно, более того, если до строки
ModalResult := mrOk;
работает кнопка, у которой свойство ModalResult := mrCancel, то после отработки этой строки кнопка перестает гасить форму.
Подскажите пожалуйста!
Заранее благодарю...

← →
Nikolay M. © (2004-02-17 17:57) [1]

1) Зацикливаешься и форма показывается снова
2) Где-то (на OnClose(Query) скорее всего) запрещаешь форме закрываться
3) Другое.

← →
Grihan (2004-02-17 18:04) [2]

1, 2 Однозначно нет.
Ставил я бряки после ShowModal - так туда даже не доходит, более того, что вызывает у меня подозрения строка выглядит так:
if fmPassword.ShowModal = mrCancel then
Exit;
так вот "синей точки" на операторе Exit нет, значит компилятор проигнорировал, наверное по причине, что "знает, что форма никогда не закроется" - а вот почему?...
остается 3, но только какое оно?...

> "знает, что форма никогда не закроется" - а вот почему?

Угу, он такой :)

Код давай.

ModalResult Найти похожие ветки