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

**Yuri_S** » 29.12.2003 (Пн) 13:07

Почему не проигрывается mp3 файл из ресурса?Вроде синтаксис же правельный...???
MediaPlayer1.Open LoadResData(101, "Custom")

**GSerg** » 30.12.2003 (Вт) 9:30

Не, вот красавец

От него ожидают иммя файла, а он суёт массив данных

**Yuri_S** » 01.01.2004 (Чт) 17:26

Мне просто надо скрыть всю музыку в ресурсах..или где-то еще....как такое сделать, чтоб пахало?

**gaidar** » 01.01.2004 (Чт) 17:35

Сначала извлечь на диск (например в %TEMP%), а потом играть.

**Yuri_S** » 02.01.2004 (Пт) 17:49

как извлекать :lol:

?

**Tarik** » 02.01.2004 (Пт) 22:17

Запись файла на диск:

Код: Выделить всё: Sub WriteFile(wfPath as string) 'где wfPath - полный путь к файлу Dim bData() As Byte bData = LoadResData(101, "custom") Open wfPath For Binary Access Write As #1 Put #1, 1, bData Close #1

**gaidar** » 02.01.2004 (Пт) 22:59

Правильно.

Вот и по мере необходимости выкидывай на диск. Если файл большой, то стоит менять курсор на часики и выводить окошко юзеру - типа working... please wait...

**Yuri_S** » 03.01.2004 (Сб) 0:32

о...оказывается все совсем не так , как я предполагал.Спасибо......а вобще когда извлекается файл из ресурса, его потом надо туда назад "вставлять" или он там все равно остается?Тоест извлекается копия или оригинал?