Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Делфи _ Tmediaplayer - Help!

Автор: Артемий 12.07.2006 19:44

Можно ли заменить TMediaPlayer mega_chok.gif на что нибудь более "симпатичное" или изменить его внешний вид??

Автор: Noof 12.07.2006 22:20

Если мне не изменяет память то это активИкс и следовательно тебе нужно пахать над ней, хотя можно сделать это более легким путем, а именно нарисовать свои кнопочки и отсылать команды сабжу.

Автор: #$# PaVeL #$# 13.07.2006 8:19

Здрасте, приехали!
TMediaPlayer - это НЕ ActiveX component.
А по поводу вида - есть два пути:
1.) Кидаешь на форму TMediaplayer, затем Копируешь MPlayer.pas и MPlayer.res в папку с проектом, добавляешь его к проекту, а в ресурсе (MPlayer.res) перерисовываешь кнопочки на такие, какие хочешь!
2.) Копируешь MPlayer.pas и MPlayer.res в папку с проектом, добавляешь его к проекту, избавляешься от интерфейсной части (делаешь родителя классом TComponent, удаляешь ВСЁ что связанно с его отображением), и в программе управляешь всеми его действиями с помощью контролов которые тебе по душе!

Автор: Noof 13.07.2006 16:27

ну простите за ложную инфу. Собсо я им долго не возился =) нужен звук? или Видео?

Автор: xds 13.07.2006 20:29

Сделай TMediaPlayer невидимым (поставь Visible := False), нарисуй (добавь на форму) свои кнопки, в обработчиках событий OnClick кнопок вызывай методы TMediaPlayer (Play, Stop, etc...) Не забудь указать TMediaPlayer'у имя файла (свойство FileName) и AutoOpen := True (либо вызывай метод Open перед тем, как начать работу с выбранным файлом).


Прикрепленные файлы
Прикрепленный файл  MediaPlayer.zip ( 3.12 килобайт ) Кол-во скачиваний: 206

Автор: #$# PaVeL #$# 22.07.2006 7:51

По моему всёже лучше избавиться от интерфейса!..
Нашёл в своих исходниках - должно нечто вроде этого получиться!Прикрепленный файл  MPlayer.pas ( 25.58 килобайт ) Кол-во скачиваний: 1001