Я начинающий программист и хотела бы спросить вот о чем: можно ли вставить музыкальный файл в программу просмотра картинок? (Например, открываешь программу, просматриваешь картинки и при этом играет какая-то мелодия). Если да, то как? Заранее благодарна.

Цитата

открываешь программу, просматриваешь картинки и при этом играет какая-то мелодия

Создаём в проекте модуль

Код

Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Код формы:

Код

Module1.sndPlaySound "C:\Мелодия.wav", 0

[email protected]
Мой сайт

всеж не могу я понять любителей VB...

А возможно ли проигрование mp3 файлов через API ?(без использования других программ .)

Через эту же Api-функциию нет. Наверное можно через другую.

Через API?
Л Е Г К О !
Не помню как полностью, но какая-то PlaySound...

Как можно определить частоту проигрываемого ПО АУДИОКАРТЕ звука?

Мария! Подключите компонент Microsoft Control 6.0, выбрав в меню проект пункт компоненты. Более подробную информацию смотрите в Самоучителе по VB 6.0 Ананьева.

а как сделать так что-бы ненадо было писать полнуыу дорогу к файлу тоесть имя диска и тд и тп бозьмём что файл находится в однои папке с проектом как написать? как код будет выглядить

Спасибо конечно вам всем за помощь пришлось самому методом попытки делать.. вот и зделал короче в модуль записать вот это

Код

Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

а вот в сому прогу там кде хотите чтобы играл музон запишите следующий код

Код

sndPlaySound App.Path & "/music/wav.wav", 1

здесь функция Апп.Патх возврасчает дорогу к ЕХЕ файлу, потом идёт присоидинение к звуку в кавычки задаите кде звук находится если есчё в подпапке какои нибуд.. надо ввести подпапку если нет то так вводите, после запятои стоит цифра один означает что будет проигрыватся звук и можно продолжат выполнять програму, когда стоит значение ноль тогда програма ждёт пока закончится звук и тогда вы сможете продолжить пользоватся програмой, надеюсь поможет...

Цитата(M @ 8.12.2004, 23:33)

Спасибо конечно вам всем за помощь пришлось самому методом попытки делать..

M.E.G.U.S, я совершенно случайно увидел этот вопрос...

Что написано в правилах форума?
Модератор: Пожалуйста, один топик - один вопрос.

Если бы ты так и сделал, то давно бы тебе уже ответили!

Цитата(M @ 8.12.2004, 23:33)

потом идёт присоидинение к звуку в кавычки задаите кде звук находится если есчё в подпапке какои нибуд..

А если не знаешь в какой подпапке лежит файл, но знаешь его название, то смотри сюда:
Как найти файл на диске?

или вот так можно искать надеюсь

Private Declare Function SearchTreeForFile Lib "imagehlp.dll" (ByVal sRootPath As String, ByVal InputPathName As String, ByVal OutputPathBuffer As String) As Long

Dim strFile As String, ret As Long
strFile = Space(260)
ret = SearchTreeForFile("C:\", "data.mdb", strFile)
If ret = 1 Then
Debug.Print Left(strFile, InStr(1, strFile, Chr(0)) - 1)
End If