Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> функция проигрывания mp3 
:(
    Опции темы
Olone
Дата 14.11.2004, 08:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 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 получше с большими параметрами?
PM MAIL   Вверх
Skywalker
Дата 15.11.2004, 20:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 332
Регистрация: 17.11.2003
Где: Днепропетровск, У краина

Репутация: нет
Всего: 2



попробуй сделать так:

dim tmpStr1 as string
dim tmpStr2 as string
tmpStr1= File1.Path &"\" & File1.FileName
tmpStr2="play " & tmpStr1
Call mciExecute(tmpStr2)

если что - стучи в асю


--------------------
"Мы в ответе за тех, кого приручили" Антуан де Сент Экзюпери, Маленький принц
PM MAIL WWW ICQ   Вверх
Olone
Дата 24.11.2004, 06:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 99
Регистрация: 3.10.2004
Где: Лефортово, Москва

Репутация: нет
Всего: 2



Ни в какую не идет - "Устройство MCI не опознано"
P.S. Аськи у меня нет пока
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0446 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.