Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.02.29;
Скачать: [xml.tar.bz2];

Вниз

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, но только какое оно?...


 
Nikolay M.   (2004-02-17 18:23) [3]


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

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

Код давай.



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.02.29;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.008 c
7-94218
nik4543
2003-12-12 05:27
2004.02.29
регулировки яркости моника


14-94090
syte_ser78
2004-02-10 14:37
2004.02.29
День святого Валентина


4-94246
brn
2003-12-21 16:08
2004.02.29
Задания(Job Object)


1-93895
Anton
2004-02-15 11:56
2004.02.29
Как изменить элемент массива?


3-93775
kiril-
2004-02-04 10:31
2004.02.29
UPPER в Interbase





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский