Заставка перед запуском основной программы

@Sergey_03 · Регистрация: 15.12.2014

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

Добрый вечер. Вопрос такой - у меня программа долго грузится - считывает кучу эксель, распихивает их по массивам и т.д. - примерно секунд 20. Потом появляется . Хочу попробовать при запуске в процессе первоначальной работы с экселем видеть форму заставки, По коду запускается два варианта

C++
1
2
3
4
5
Form19 = new TForm19(Application);
       Form19->ShowModal();
       Form19->Update();
                 Application->Initialize();
и т.д.

и

C++
1
2
3
4
5
Form19 = new TForm19(Application);
       Form19->Show();
       Form19->Update();
                 Application->Initialize();
и т.д.

В первом варианте открывает окно (19 форма), работает таймер мигания картинки, расположенной на этой форме, но дальше не идет - работа проги останавливается - видимо ждет ответа.
Во втором все работает, но форма 19 не активна то есть на ней не работает таймер мигания картинки, расположенной на этой форме.
Собственно возможно?Спасибо.

@volvo · 21.10.2015, 12:31

Sergey_03, в качестве начального наброска - вот такая схема (на XE2 вроде собирается и даже работает

) :

@Sergey_03 · 21.10.2015, 15:02 **[ТС]**

Спасибо большое. Попробую.

@Sergey_03 · 24.10.2015, 00:15 **[ТС]**

Спасибо огромное. Все допер, все получилось!

Новые блоги и статьи Все статьи Все блоги /
Калькулятор для расчета родства russiannick 07.08.2026 1. Задача: Создать калькулятор для расчета родства. Родственных связей существует 8 ступеней, такие как: p - отец P - мать q - муж Q - жена b - брат B - сестра s - сын S - дочь	Мир по моей воле kumehtar 07.08.2026 Когда-то кажется, что всё просто. Ты весь такой светлый. Причиняешь добро. Борешься за справедливость в этом тёмном мире. Потом начинаешь замечать одну неприятную вещь. Почти каждый хороший. . .	Кредитный калькулятор Maks 05.08.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Напишите приложение-калькулятор, которое помогает рассчитывать параметры кредита для аннуитетного и дифференцированного видов. . .	У нас сейчас поговорку "Опять 25" нужно переделать на "Опять +35". kumehtar 04.08.2026 С ностальгией вспоминаю времена моего детства, когда у нас и правда +25 - была максимальная температура летом. Раньше +25 °C реально казались вершиной жары, когда можно было весь день пропадать на. . .
Как ИИ начал спорить и врать (возможно почуяв опасность для себя от индустрии - уход от электроники). Hrethgir 04.08.2026 Недельный диалог, на фоне событий с НПЗ. Да, из спирта можно получать бензин, и это не сложно. Но потом в схеме я решил избавиться от насоса, при этом полностью сделав контроль подачи спирта в. . .	Термопринтер QR701 Argus19 03.08.2026 Термопринтер QR701 Купил два термопринтера QR701. На сэлф-тесте написано: Language: PC936 (GB18030). Что означает, что принтеры могут печатать только латиницу и китайские иероглифы. Так же. . .	Создание формы заимствованного документа Maks 03.08.2026 Задача: Необходимо создать собственную форму заимствованного документа. На форме должен быть реквизит "Покупатель", а также табличная часть со следующими реквизитами: - Расчетный счет покупателя. . .	Задача предоставления скидок покупателям Maks 03.08.2026 Задача: В документе "Продажи" необходимо реализовать функционал предоставления скидок покупателям. Скидка должна автоматически рассчитываться и подставляться в соответствующее поле при выборе. . .

@Sergey_03 21 / 9 / 4 Регистрация: 15.12.2014 Сообщений: 663
	21.10.2015, 15:02 [ТС]
	Спасибо большое. Попробую. 0

@Sergey_03 21 / 9 / 4 Регистрация: 15.12.2014 Сообщений: 663
	24.10.2015, 00:15 [ТС]
	Спасибо огромное. Все допер, все получилось! 0

Заставка перед запуском основной программы

Решение