Как открыть сразу две формы

[mymedia]

Здаствуйте!
Мне нужно открыть при запуске программы сразу две формы
Вызов Form2->Show() в OnCreate не действует

void __fastcall TForm1::FormCreate(TObject *Sender)
{
        // ...
        Form2->Show();
}

Кто-нибудь, подскажите как показать сразу две формы

[nick42]

- ну, показать-то можно (onFormShow для первой формы):

  if (!Form2->Visible) Form2->Show();

; вот только пока не получается её "наверх" поместить. Стандартные средства не срабатывают, но где-то мне попадалась такая функция... .

[Stilet]

Вызов Form2->Show() в OnCreate не действует

Наверное потому что она еще не создана. Посмотри последовательность создания форм. Открывай форму на экран не при создании первой формы а в ее собственном обработчике.

[nick42]

-умно, но непонятно. "Окна" на экране появляются полноценные и почти сразу, одновременно (глаз не различает задержки во всяком случае). Вот это "почти" - существенно, мне кажется. Когда в обработчике события OnPaint для второй формы я пропишу BringToFront, она появляется сверху.

[Stilet]

Вот это "почти" - существенно, мне кажется.

Не уловил мысли... Поясни подробнее.

[nick42]

Пояснять уместно там, где есть понимание. У меня же "ощущения". Дав команду системе на построение второй формы нет смысла тут же указывать для этой второй формы какие-то свойства, особенно визуальные, так как процесс создания формы идет параллельно и еще не завершен. А вот если включить это действие в реакцию на событие от этой второй формы (напр. onPaint), то можно рассчитывать на успех.

[Stilet]

так как процесс создания формы идет параллельно и еще не завершен.

У тебя формы в разных потоках создаются??

А вот если включить это действие в реакцию на событие от этой второй формы (напр. onPaint), то можно рассчитывать на успех.

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

[nick42]

- задача, видишь ли, не моя и она уже решена абсолютно (и обе формы появляются, и позицию каждой на раб.столе задать можно), а о понимании я уже писал чуть выше