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

@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 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .

@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

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

Решение