Как запустить воспроизведение звука Опции

[klem4]

Не используя панель кнопок TMediaPlayer ? То есть панель не должны быть видна на форме, а воспроизведение надо начать например после нажатия Button1.

спасибо.

пробовал вот так :

MediaPlayer1.FileName:='c:\ping';
    MediaPlayer1.Open;
    MediaPlayer1.Play;

но это ерунда какая-то.

Сообщение отредактировано: klem4 - 15.08.2005 10:50

[Malice]

Примерно так:

sndPlaySound(pchar(filename), SND_ASYNC);

[klem4]

Что-то не выходит Что это за метод такой ? Это компонент TMediaPlayer или нет ? Если не трудно, покажи на примере как это должно выглядеть.

[Malice]

Забыл сказать, uses mmsystem добавь. :yes:

[klem4]

Да, теперь компилируется ))) Но результата нет. На сколько я понял эта штука не связана с TMediaPlayer.

вот в данном случае что может быть не привильно:

procedure TForm1.Button2Click(Sender: TObject);
begin
   sndPlaySound('c:\ping.wmf', SND_ASYNC);
end;

[Malice]

Может так?
sndPlaySound(PChar('c:\ping.wmf'), SND_ASYNC);

[klem4]

Неа ... не помогло (

[Malice]

Неа ... не помогло (

Тогда может wmf не нравится ? Попробуй в WAV перевести, я только что проверил, все ок.

[klem4]

Спасибо, тот файл вообще был mp3, сейчас попробовал файл wav, все ок.

[xds]

Такми способом можно воспроизводить и поток MP3, упакованный внутрь RIFF WAVE. Отличается он от "чистого" MP3-потока наличием в начале RIFF-заголовка (RIFF-типа "WAVE"), секции "fmt", описывающей формат WAV-файла, и секции "data", содержащей сами сжатые аудио-данные. Т. о., получается WAV, сжатый алгоритмом MP3. Такие файлы умеют создавать многие конверторы WAV в MP3. Забавно, но зачастую множествно MP3 WAV'ов можно обнаружить в своей аудио-коллекции, причём, как правило, с расширением MP3 Выгода от такого формата в последнем случае стремится к нулю слева, т. к. RIFF-аттрибутика только занимает место, а большинство плееров прекрасно пропускают её мимо ушей пользователя (mpg123 не стесняясь называет её мусором!)