![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 02.05.2011
Сообщений: 45
|
![]()
Подскажите, как добавить видео *.wmv в Delphi, чтобы при запуске приложения оно сразу проигрывалось?
Я сделала с помощью MediaPlayer, в FileName указала путь к файлу (он у меня на рабочем столе, это же не страшно?) в AutoOpen - true. При запуске он проигрывает видео, но в отдельной форме. Как мне сделать так, чтобы была одна форма, т.е. запускаю, оно играет, потом закончилось и моя форма осталась, и с ней я еще могу работать, допустим, что-то рисовать, нажимать кнопки... |
![]() |
![]() |
![]() |
#2 |
Форумчанин
Регистрация: 06.12.2010
Сообщений: 300
|
![]()
Чтобы не появлялось дополнительное окошко, плееру нужно указать, куда выводить изображение (св-во Display). Обычно для этого отводят обычную панель.
|
![]() |
![]() |
![]() |
#3 |
Пользователь
Регистрация: 02.05.2011
Сообщений: 45
|
![]()
ага, спасибо))
еще как сделать, чтобы после просмотра видео эта панель сразу же удалилась или очистилась (лучше удалилась), а то в ней остается последний кадр? |
![]() |
![]() |
![]() |
#4 |
Форумчанин
Регистрация: 06.12.2010
Сообщений: 300
|
![]()
Спрячьте ее.
|
![]() |
![]() |
![]() |
#5 |
Пользователь
Регистрация: 02.05.2011
Сообщений: 45
|
![]()
Как спрятать? С помощью св-ва Visible? Не получается.
Я так думаю по окончании видео сделать Panel1.Destroy, но не знаю, как определить, что видео закончилось. Вообще, как это определяется? |
![]() |
![]() |
![]() |
#6 | |
Форумчанин
Регистрация: 06.12.2010
Сообщений: 300
|
![]() Цитата:
Перед запуском видео установите Notify := True тогда после остановки сработает событие OnNotify. Удобно его в OnClick устанавливать. |
|
![]() |
![]() |
![]() |
#7 |
Пользователь
Регистрация: 02.05.2011
Сообщений: 45
|
![]()
Мне бы желательно без OnClick, нужно, чтобы видео проигралось и осталась пустая форма. Я что-то наверное не так делаю, приведите пожалуйста пример кода, если не сложно.
Я так делаю: Код:
|
![]() |
![]() |
![]() |
#8 |
Форумчанин
Регистрация: 06.12.2010
Сообщений: 300
|
![]()
Попробуйте Play делать после Notify:=true.
|
![]() |
![]() |
![]() |
#9 |
Пользователь
Регистрация: 02.05.2011
Сообщений: 45
|
![]()
ничего не изменилось
|
![]() |
![]() |
![]() |
#10 |
Пользователь
Регистрация: 02.05.2011
Сообщений: 45
|
![]()
Я подумала,может так:
Код:
Спасибо за помощь ![]() |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как добавить? | cargo29 | Работа с сетью в Delphi | 1 | 14.12.2010 22:50 |
Как добавить \r\n.\r\n ??? | dimorik | Общие вопросы C/C++ | 1 | 23.03.2010 11:57 |
Как добавить компонент? | iiunbreakableii | Общие вопросы C/C++ | 9 | 10.06.2009 09:01 |
Как добавить в автозапуск? | AngelOfDeath | Win Api | 4 | 19.05.2008 10:55 |