![]() |
|
Модераторы: Akina |
![]()
|
|
| Olone |
|
|||
![]() Шустрый ![]() Профиль Группа: Участник Сообщений: 99 Регистрация: 3.10.2004 Где: Лефортово, Москва Репутация: нет Всего: 2 |
Народ плиз хелп!!!!!!!!!!!!
Знаю существуют функция проигрывания mp3 файлов запись которой: Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long 'чтобы воспроизвести файл Call mciExecute("play имя вашего файла") 'чтобы закрыть файл Call mciExecute("close имя вашего файла") Как поставить чтобы она(функция) проигрывала выделенный файл в FileListBox пишу: Call mciExecute("play File1.Path &"\" & File1.FileName") не выходит(как и многими другими способами) как нужно прописывать? Существует ли функция проигрывания mp3 получше с большими параметрами? |
|||
|
||||
| Skywalker |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 332 Регистрация: 17.11.2003 Где: Днепропетровск, У краина Репутация: нет Всего: 2 |
попробуй сделать так:
dim tmpStr1 as string dim tmpStr2 as string tmpStr1= File1.Path &"\" & File1.FileName tmpStr2="play " & tmpStr1 Call mciExecute(tmpStr2) если что - стучи в асю -------------------- "Мы в ответе за тех, кого приручили" Антуан де Сент Экзюпери, Маленький принц |
|||
|
||||
| Olone |
|
|||
![]() Шустрый ![]() Профиль Группа: Участник Сообщений: 99 Регистрация: 3.10.2004 Где: Лефортово, Москва Репутация: нет Всего: 2 |
Ни в какую не идет - "Устройство MCI не опознано"
P.S. Аськи у меня нет пока |
|||
|
||||
![]()
|
| Правила форума "VB6" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | VB6 | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |