Конференция VBStreets

**Scuder** » 12.05.2004 (Ср) 14:07

В общем, так я и не разобрался с WMP, точнее с очисткой памяти, поэтому вопрос ребром: как проиграть MPEG файл? То есть, какой контрол, кроме "подарков" от Microsoft, можно использовать и где взять OCX? Единственное условие: контрол должен уметь работать без отображения кнопок управления, названия файла и т.п., просто показывать голое видео..

ПЛЗ, ну ОЧЕНЬ нужно..

**alibek** » 12.05.2004 (Ср) 14:19

Многие плейеры предоставляют возможность управления из внешней программы (WinAmp, Light Alloy). Обычно это SendMessage, конкретная информация отображена в соответствующих SDK.
Не устроит тебя просто использовать внешний плейер, а управлять им из своей программы?

**Scuder** » 12.05.2004 (Ср) 14:31

Нет, мне нужен именно контрол.. Вся программа в целом, и все формы в частности, всегда TOP_MOST. И ещё: контрол должен обрабатывать события mouse_click и конец файла..

**Urvin** » 12.05.2004 (Ср) 22:00

А MCI не пойдет? У меня стойкое мнение, что все контролы все равно созданы на виндосовских апи.

**Scuder** » 13.05.2004 (Чт) 12:35

Честно говоря, я с ним так и не разобрался.. Что-то читал по поводу того, что он может видео и в пикчер-боксе проигрывать, но как - я не понял.. Может есть примерчик какой-нибудь? Буду очень благодарен. :-)

**Tarik** » 13.05.2004 (Чт) 17:43

А если использовать MMC? Просто подключаешь к проекту Microsoft Multimedia Control, кидаешь его на форму и ставишь visible=false. Дальше пишешь код:

Код: Выделить всё: MMC1.Shareable = False MMC1.DeviceType = "AVIVideo" 'проигрываем видео MMC1.Filename = [путь к файлу] MMC1.hWndDisplay = Picture1.hwnd 'Проигрываем в picturebox MMC1.Command = "open" 'открываем файл MMC1.Command = "play" 'играем файл

**Scuder** » 13.05.2004 (Чт) 18:04

2 Tarik. У меня размер изображения имеет меньший размер, чем Picture. При запуске MMC уменьшает размер картинки, а этого быть не должно. Лечится?

Размер пикчербокса устанавливал и после Play..

**Scuder** » 13.05.2004 (Чт) 18:11

Немножко соврал.. Размер картинки не уменьшается, просто файл в оригинале проигрывается.. А растянуть его до границ картинки реально?

**Urvin** » 14.05.2004 (Пт) 11:45

Tarik писал(а):А если использовать MMC? Просто подключаешь к проекту Microsoft Multimedia Control, кидаешь его на форму и ставишь visible=false. Дальше пишешь код:
Код: Выделить всё
MMC1.Shareable = False MMC1.DeviceType = "AVIVideo" 'проигрываем видео MMC1.Filename = [путь к файлу] MMC1.hWndDisplay = Picture1.hwnd 'Проигрываем в picturebox MMC1.Command = "open" 'открываем файл MMC1.Command = "play" 'играем файл

Только для МПЕГА и других видео и аудио типа мп3
MMC1.DeviceType = "MPEGVideo"

**Scuder** » 14.05.2004 (Пт) 11:49

Одна фигня.. Проигрывает также и не растягивает.. Это плохо..

Конференция VBStreets

Проиграть MPEG

Проиграть MPEG

Кто сейчас на конференции