Закрыть модальную форму

@Rivory · Регистрация: 15.01.2013

Студворк — интернет-сервис помощи студентам

Столкнулся со следующей проблемой.

У меня в проекте есть главная форма, с которой я по кнопке открываю модально вторую форму.

C++
1
2
3
4
void __fastcall TfrmMain::Button3Click(TObject *Sender)
{
    frmAdd_client->ShowModal();
}

Потом я со второй формы открываю модально третью форму

C++
1
2
3
4
void __fastcall TfrmAdd_client::btnCalendarClick(TObject *Sender)
{
    frmCalendar->ShowModal();
}

Третья форма - это календарь, где я после даблклика по нужной дате хочу передать эту дату во 2ую форму и закрыть календарь.

C++
1
2
3
4
5
void __fastcall TfrmCalendar::CCalendar1DblClick(TObject *Sender)
{
    frmAdd_client->edDate->Text = CCalendar1->CalendarDate.DateString();
    frmCalendar->Close();
}

Но после этого, у меня сразу закрывается как 2ая, так и 3тья формы(остается активной только главная). Как мне закрыть только 3ью, оставив активной 2ую? Кстати, аналогично работает, если я на 3тьей форме жму крестик(закрывается 2ая тоже).

@volvo · 24.09.2013, 11:25

На новом проекте не воспроизводится... Прикрепляй минимальный проект, который иллюстрирует ошибку.

@SatanaXIII · 24.09.2013, 11:38

Да. Все отрабатывает четко.
У вас точно нигде больше не происходит закрытие какой-либо формы?

Не по теме:

Приходит в голову костыль - при закрытии третьей формы открывать вторую принудительно.

@Rivory · 24.09.2013, 11:41 **[ТС]**

Блин, какой-то он большущий получился.
Проект для RAD Studio XE

У вас точно нигде больше не происходит закрытие какой-либо формы?

2ая форма закрывается(то есть должна закрываться) только при нажатии кнопки добавления клиента. Больше нигде не вижу.

@volvo · 24.09.2013, 12:06

C++
1
2
3
4
5
void __fastcall TfrmAdd_client::btnCalendarClick(TObject *Sender)
{
    ModalResult = mrNone; // Добавь вот это, по какой-то причине у тебя ModalResult был = 1
    frmCalendar->ShowModal();
}

@Rivory · 24.09.2013, 12:09 **[ТС]**

Спасибо, все заработало. Так и не понял что я сделал, поэтому сейчас пойду читать что такое ModalResult. Но в любом случае спасибо.

Новые блоги и статьи Все статьи Все блоги /
Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .

@volvo Супер-модератор 33414 / 21523 / 8237 Регистрация: 22.10.2011 Сообщений: 36,923 Записей в блоге: 12
	24.09.2013, 11:25
	На новом проекте не воспроизводится... Прикрепляй минимальный проект, который иллюстрирует ошибку. 1

@SatanaXIII Почетный модератор 5851 / 2862 / 392 Регистрация: 01.11.2011 Сообщений: 6,906
	24.09.2013, 11:38
	Да. Все отрабатывает четко. У вас точно нигде больше не происходит закрытие какой-либо формы? Не по теме: Приходит в голову костыль - при закрытии третьей формы открывать вторую принудительно. 1

@Rivory 148 / 114 / 21 Регистрация: 15.01.2013 Сообщений: 266
	24.09.2013, 12:09 [ТС]
	Спасибо, все заработало. Так и не понял что я сделал, поэтому сейчас пойду читать что такое ModalResult. Но в любом случае спасибо. 0