Progressbar - Форум «Всё о Паскале»

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

Progressbar, Полоса загрузки

Dead.MorozZ	13.11.2005 18:17 Сообщение #1
Пионер Группа: Пользователи Сообщений: 108 Пол: Мужской Реальное имя: Георгий Репутация: 0	Как сделать приложение: при запуске программы появляется окошко, в котором полоса загрузки "ползет" до тех пор пока играет музыка. Музыка заканчивается полоса исчезает и появляется окно с формой. Помогите пожа.. -------------------- Минус - это уже половина плюса, а плюс порой - целых два минуса...

Fang	17.11.2005 21:37 Сообщение #2
Новичок Группа: Пользователи Сообщений: 48 Пол: Мужской Реальное имя: Fang Репутация: 2	Не понимаю зачем нужно слушать музыку перед запуском программы А если по теме: можешь посмотреть длину трека. Добавить на форму таймер и отрегулировать его интревал, чтобы заполнение прогресс-бара совпадало с концом песни.

klem4	17.11.2005 21:48 Сообщение #3
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44	Цитата Не понимаю зачем нужно слушать музыку перед запуском программы Очень часто используется ... только всетаки не ПЕРЕД запуском программы а ВО ВРЕМЯ запуска ... например ICQ -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'

Fang	18.11.2005 12:41 Сообщение #4
Новичок Группа: Пользователи Сообщений: 48 Пол: Мужской Реальное имя: Fang Репутация: 2	Цитата Очень часто используется ... только всетаки не ПЕРЕД запуском программы а ВО ВРЕМЯ запуска ... например ICQ Ну.. очень часто оно используется немного в других целях. Окошко (с прогрессбаром или без) показывают пользователю, чтобы информировать его о процессе загрузки программы, а не для того чтобы там проиграла музыка. Если программа небольшая и быстро грузиться, то необходимость в таком окне отпадает.

klem4	18.11.2005 12:47 Сообщение #5
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44	Извини конечно но причем тут прогрессбар? я ответел тебе на конкретное высказывание Цитата(Fang) Не понимаю зачем нужно слушать музыку перед запуском программы ? -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'

hiv	18.11.2005 13:07 Сообщение #6
Профи Группа: Пользователи Сообщений: 660 Пол: Мужской Реальное имя: Михаил Репутация: 11	При старте программы стартуешь таймер с периодом пусть 1сек и воспроизведение звука. Далее по событию таймера смотришь позицию TMediaPlayer.Position в общей длине воспроизводимого звука TMediaPlayer.Length и соответственно отмеряешь свой прогрессбар. Только чтобы это все отрисовывалось нада там же (в событии таймера) запускать в конце Application.ProcessMessages; Ну и проверка отыграла музыка или нет -------------------- Никогда не жадничай. Свои проблемы с любовью дари людям!

Dead.MorozZ	18.11.2005 23:38 Сообщение #7
Пионер Группа: Пользователи Сообщений: 108 Пол: Мужской Реальное имя: Георгий Репутация: 0	To: hiv О спасибо за помощь все так и сделал Сообщение отредактировано: Dead.MorozZ - 18.11.2005 23:39 -------------------- Минус - это уже половина плюса, а плюс порой - целых два минуса...

1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)

Пользователей: 0