Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: СУБД и Delphi/Lazarus

Подписаться Бесплатная «Серебряная» новостная рассылка . Подписчиков 701 RSS
←   Август 2006   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31


За последние 60 дней ни разу не выходила


Сайт рассылки: http://rusfaq.ru
Открыта: 16-03-2006

Автор
Калашников О.А.

Статистика

701 подписчиков
0 за неделю
←   Все выпуски   →

RusFAQ.ru: СУБД и Delphi


РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / СУБД и Delphi

Выпуск № 189
от 08.08.2006, 15:35

Администратор:CJ
В рассылке:Подписчиков: 234, Экспертов: 26
В номере:Вопросов: 1, Ответов: 2

Вопрос № 51040: При загрузки, моя прога делает коекакие операции, как сделать spalshscreen (просто сплаш сделал) чтоб высвечивал статус етих операций и не ждать в темноте пока все закончится? (как в acrobat или photoshop) А именно в какие места файла проэкта нужно в...

Вопрос № 51.040
При загрузки, моя прога делает коекакие операции, как сделать spalshscreen (просто сплаш сделал) чтоб высвечивал статус етих операций и не ждать в темноте пока все закончится? (как в acrobat или photoshop) А именно в какие места файла проэкта нужно вставить мои операции, что после чего нужно идти?
Отправлен: 03.08.2006, 15:06
Вопрос задал: Negruzzi Cristian (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 2)
Отвечает: Physicist
Здравствуйте, Negruzzi Cristian!

Добавь на splash-форму TLabel и выводи туда текст, поясняющий действия программы при загрузке, например:

Приложение:

Ответ отправил: Physicist (статус: Студент)
Ответ отправлен: 03.08.2006, 15:19
Отвечает: Архангельский Андрей Германович
Здравствуйте, Negruzzi Cristian!

В файле проекта (.dpr) нужен следующий код

Var
wndWelcome : TfmWelcome;

begin
Application.Initialize;
wndWelcome := TfmWelcome.Create(Application); - вспомогательная форма, на которой показывается ход загрузки
try
wndWelcome.Show; wndWelcome.Update;
Application.CreateForm(TMainForm, MainForm); -- главная форма приложения
Application.CreateForm(TfmUsrConnect, fmUsrConnect);
Application.CreateForm(TfmDateEdit, fmDateEdit);
sleep(2500); -- задержка если необходимо
wndWelcome.Close; -- закрытие вспомогательной формы
finally
wndWelcome.Free; -- освобождение памяти
end;
Application.Run; -- запуск соновного приложения
end.
---------
Если дело заслуживает быть сделаным, то оно заслуживает чтобы его сделали ХОРОШО
Ответ отправил: Архангельский Андрей Германович (статус: Практикант)
Ответ отправлен: 03.08.2006, 15:43
Оценка за ответ: 5

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.

© 2001-2006, Портал RusFAQ.ru, Россия, Москва.
Идея, дизайн, программирование: Калашников О.А.
Email: adm@rusfaq.ru, Тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале
Версия системы: 4.35 от 27.07.2006 		Яндекс Rambler's Top100
В избранное