![]() |
|
Модераторы: Snowy, MetalFan, bems, Poseidon |
![]()
|
|
| Aleks26 |
|
|||
![]() Шустрый ![]() Профиль Группа: Участник Сообщений: 68 Регистрация: 12.3.2010 Репутация: нет Всего: нет |
В учебнике сказано, что свойство ModalResult для кнопки на форме, отличное от mrNone, при нажатии на кнопку заносится в свойство ModalResult формы и в результате модальная форма закрывается. У меня есть следующий обработчик события:
procedure TfrmListComp2.btnFrm2ToFrm1Click(Sender: TObject); begin btnFrm2ToFrm1.ModalResult:=mrCancel; frmListComp1.Show; end; Но при первом прохождении через него ModalResult для формы frmListComp2 остается нулевым и форма не закрывается. Только при попытке вновь на нее перейти, получив предупреждение о видимой модальной форме, нажав OK, я при следующем нажатии на btnFrm2ToFrm1 это свойство уже равно 2 и модальная форма закрывается без проблем. Значит, ModalResult для кнопки передается в одноименное свойство формы не сразу, а только при втором обращении? Потому что, присваивая mrCancel сразу в свойство формы, она закрывается сразу. |
|||
|
||||
| Frees |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 2233 Регистрация: 2.12.2005 Где: Екатеринбург Репутация: 16 Всего: 54 |
потомучто при первом нажатии у кнопки ModalResult mrNone - форма не закрылась при клике втрой раз она уже mrCancel и форма закрылаь.
что не так ModalResult из кнопки в форму передается при ее нажатии событие клика вызывается после этого смотри исходники там все ответы есть -------------------- Кольцов Виктор Владимирович |
|||
|
||||
| Grag |
|
|||
![]() Новичок Профиль Группа: Участник Сообщений: 15 Регистрация: 22.12.2007 Где: Красноярск Репутация: нет Всего: нет |
При проектировании нужно сразу определять чему будет равно свойство кнопки ModalResult, а в вызывающей форме определять уже возвращаемый результат при закрытии модального окна...
|
|||
|
||||
![]()
|
| Правила форума "Delphi: Для новичков" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Для новичков | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |