Проблемы с модальной формой

@Perun · Регистрация: 22.02.2008

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

Проблема такая.
Во время загрузки основной формы надо показать модальную(например для выбора пользователя).
Вызываю модальную форму методом ShowModal() на событие Activate() основной формы.
Но половина основной формы при этом чем-то заслоняется и не видна(видимо она не находится на первом плане).
После выбора пользователя основная форма выглядит нормально.
При повторном вызове модальной формы основная ничем не перекрывается.
Пробовал тот же код помещать в событие OnShow() - никаких изменений.Тоже происходит на вывод сообщения во время события.
Объясните, что происходит?

@Lord_Voodoo · 21.03.2008, 09:46

я обычно такое окошко ставлю в конструкторе основной формы, так надежнее

@Perun · 21.03.2008, 10:37 **[ТС]**

Я поставил вызов в конструктор основной формы, но модальная ещё не создана и среда выдала ошибку памяти - EAccessViolation. Я что-то не так понял, вот код:

C++

// конструктор основной формы
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
 Form2->ShowModal();
}

p.s. Кстати большое спасибо за помощь по подключению справки - работает.

@Lord_Voodoo · 21.03.2008, 10:44

ты только не подумай, что я тебя учить программить собираюсь, но я сам в проекте только mainform оставляю в автосоздании, а остальное создаю и удаляю по мере надобности, т.е. твой код должен выглядеть примерно так:

Код

// конструктор основной формы
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
Form2 = new TForm2(NULL);
Form2->ShowModal();
delete Form2;
}

@Perun · 21.03.2008, 11:57 **[ТС]**

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

Ничего страшного.
Мне надо, чтобы на фоне основной формы показалась модальная.
Я это сделал через событие onActivate(), заблокировал основную форму, а модальную вызвал методом Show(). Хотелось проще....

@Lord_Voodoo · 21.03.2008, 12:01

так сделай окну свойство stayontop и пропиши еще:

Код

void __fastcall TForm2::Form2Paint(TObject *Sender)
{
   Application->RestoreTopMosts();
}

@Perun · 21.03.2008, 12:09 **[ТС]**

Так и сделал.
Form1->FormStyle = fsStayOnTop;

Результат: появляется модальная форма, а заднего фона основной нет
???????

@Lord_Voodoo · 21.03.2008, 12:52

ну окно просто не прорисовалось полностью, вот и выглядит дико, там последним событием в хелпе значится onPaint, попробуй в него запихнуть вызов окна

@Perun · 21.03.2008, 13:02 **[ТС]**

Запутался... в чьё событие?
Главного....?

@Lord_Voodoo · 21.03.2008, 13:10

вызов твоего модального окна засунь в onpaint основного окна, а тот код, что я тебе писал, в событие модального окна, просто в билдере есть глюк на счет stayontop, который решается такой командой - Application->RestoreTopMosts();

@Perun · 21.03.2008, 15:43 **[ТС]**

при такой раскладе прога циклится и появляется много модальных окон
Неприятно, когда в таком простом моменте вспотыкаешься, если не трудно лучше
кодом описать?

Form1 - основное окно
Form2 - модальное

C++

void __fastcall TForm1::FormPaint(TObject *Sender)
{
 Form2 = new TForm2(NULL);
 Form2->ShowModal();
 delete Form2;
}

???
это куда Application->RestoreTopMosts();

@Lord_Voodoo · 21.03.2008, 15:46

ну так я же писал тебе - в модальное окно на событие onpaint

@Perun · 21.03.2008, 16:45 **[ТС]**

То есть код такой:
Form1 - основное окно
Form2 - модальное

C++

void __fastcall TForm1::FormPaint(TObject *Sender)
{
 Form2 = new TForm2(NULL);
 Form2->ShowModal();
 delete Form2;
}
void __fastcall TForm2::FormPaint(TObject *Sender)
{
  Application->RestoreTopMosts();
}

При запуске возникает ошибка доступа к памяти
А модальных окон 4 штуки - закрываю - ошибка.
Что не так?

@Lord_Voodoo · 21.03.2008, 16:58

а ты из проекта из auto-create forms убрал form2

@Perun · 21.03.2008, 17:40 **[ТС]**

конечно.
А у тебя всё работает?
Покажи свой листинг пожайлуста.
У меня получается так, что событие onPaint() отрабатывает несколько раз при попытке закрыть модальную форму.

@Perun · 22.03.2008, 22:02 **[ТС]**

Всё, наконец-то получилось с формой!!!
Но возникла другая задача. Также при загрузке проводится анализ, в результате которого должно появиться или не появиться сообщение.
Для примера просто ShowMessage("пример") написал в событие onPaint() - такая же ерунда как до этого с формой была.
Что можно сделать?

@Lord_Voodoo · 24.03.2008, 09:27

Сообщение от Perun

конечно.
А у тебя всё работает?
Покажи свой листинг пожайлуста.
У меня получается так, что событие onPaint() отрабатывает несколько раз при попытке закрыть модальную форму.

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

@Lord_Voodoo · 24.03.2008, 09:28

ну тут нужно свое окно сообщений создавать и обрабатывать по аналогичной схеме...

@Perun · 25.03.2008, 10:41 **[ТС]**

Всё добил, немного опимизировать код и красиво будет.
Иногда лёгкий путь трудно найти..... Б Л А Г О Д А Р Ю!!!

@Lord_Voodoo · 25.03.2008, 10:44

кто ищет, тот всегда найдет

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	21.03.2008, 16:58	14
	а ты из проекта из auto-create forms убрал form2 0

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	24.03.2008, 09:28	18
	ну тут нужно свое окно сообщений создавать и обрабатывать по аналогичной схеме... 0

@Perun 5 / 5 / 3 Регистрация: 22.02.2008 Сообщений: 137
	25.03.2008, 10:41 [ТС]	19
	Всё добил, немного опимизировать код и красиво будет. Иногда лёгкий путь трудно найти..... Б Л А Г О Д А Р Ю!!! 0

@Perun 5 / 5 / 3 Регистрация: 22.02.2008 Сообщений: 137
		1
	Проблемы с модальной формой 21.03.2008, 09:30. Показов 3778. Ответов 19 Метки нет (Все метки) Проблема такая. Во время загрузки основной формы надо показать модальную(например для выбора пользователя). Вызываю модальную форму методом ShowModal() на событие Activate() основной формы. Но половина основной формы при этом чем-то заслоняется и не видна(видимо она не находится на первом плане). После выбора пользователя основная форма выглядит нормально. При повторном вызове модальной формы основная ничем не перекрывается. Пробовал тот же код помещать в событие OnShow() - никаких изменений.Тоже происходит на вывод сообщения во время события. Объясните, что происходит? Миниатюры 0

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	21.03.2008, 09:46	2
	я обычно такое окошко ставлю в конструкторе основной формы, так надежнее 0

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	21.03.2008, 10:44	4
	ты только не подумай, что я тебя учить программить собираюсь, но я сам в проекте только mainform оставляю в автосоздании, а остальное создаю и удаляю по мере надобности, т.е. твой код должен выглядеть примерно так: Код // конструктор основной формы __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { Form2 = new TForm2(NULL); Form2->ShowModal(); delete Form2; } 0

@Perun 5 / 5 / 3 Регистрация: 22.02.2008 Сообщений: 137
	21.03.2008, 11:57 [ТС]	5
	ты только не подумай, что я тебя учить программировать собираюсь Ничего страшного. Мне надо, чтобы на фоне основной формы показалась модальная. Я это сделал через событие onActivate(), заблокировал основную форму, а модальную вызвал методом Show(). Хотелось проще.... 0

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	21.03.2008, 12:01	6
	так сделай окну свойство stayontop и пропиши еще: Код void __fastcall TForm2::Form2Paint(TObject *Sender) { Application->RestoreTopMosts(); } 0

@Perun 5 / 5 / 3 Регистрация: 22.02.2008 Сообщений: 137
	21.03.2008, 12:09 [ТС]	7
	Так и сделал. Form1->FormStyle = fsStayOnTop; Результат: появляется модальная форма, а заднего фона основной нет ??????? 0

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	21.03.2008, 12:52	8
	ну окно просто не прорисовалось полностью, вот и выглядит дико, там последним событием в хелпе значится onPaint, попробуй в него запихнуть вызов окна 0

@Perun 5 / 5 / 3 Регистрация: 22.02.2008 Сообщений: 137
	21.03.2008, 13:02 [ТС]	9
	Запутался... в чьё событие? Главного....? 0

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	21.03.2008, 13:10	10
	вызов твоего модального окна засунь в onpaint основного окна, а тот код, что я тебе писал, в событие модального окна, просто в билдере есть глюк на счет stayontop, который решается такой командой - Application->RestoreTopMosts(); 0

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	21.03.2008, 15:46	12
	ну так я же писал тебе - в модальное окно на событие onpaint 0

@Perun 5 / 5 / 3 Регистрация: 22.02.2008 Сообщений: 137
	21.03.2008, 17:40 [ТС]	15
	конечно. А у тебя всё работает? Покажи свой листинг пожайлуста. У меня получается так, что событие onPaint() отрабатывает несколько раз при попытке закрыть модальную форму. 0

@Perun 5 / 5 / 3 Регистрация: 22.02.2008 Сообщений: 137
	22.03.2008, 22:02 [ТС]	16
	Всё, наконец-то получилось с формой!!! Но возникла другая задача. Также при загрузке проводится анализ, в результате которого должно появиться или не появиться сообщение. Для примера просто ShowMessage("пример") написал в событие onPaint() - такая же ерунда как до этого с формой была. Что можно сделать? 0

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	24.03.2008, 09:27	17
	Сообщение от Perun конечно. А у тебя всё работает? Покажи свой листинг пожайлуста. У меня получается так, что событие onPaint() отрабатывает несколько раз при попытке закрыть модальную форму. ну так понятно, что данное событие не только при создании срабатывает, надо придумывать как его в других случаях отсеивать... той же самой болевой переменной, например... 0

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	25.03.2008, 10:44	20
	кто ищет, тот всегда найдет 0