Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Звуки в делфе

Автор: Иван Помидоров 9.7.2004, 18:18

Нужно сделать чтобы по нажатии на кнопку проигрывался файл.mid, с помощью какого компонента это можно сделать??? и как??? или подскажите где статейку по этому вопросу почитать, а то я че-то не нашел.

Заранее благодарен.

Автор: Pakshin A. S. 9.7.2004, 18:25

В OnClick'е используешь процедуру PlaySound (в справке всвё написано). Ну а если компоненту надо, то MediaPlayer подойдет (хотя места займет)...

Автор: p0s0l 9.7.2004, 21:44

Иван Помидоров, качай док на все случаи жизни - Delphi Russian Knowledge Base from Vit...
Это оттуда:

Код

uses  
  MMSystem;  

// Проиграть Midi  
procedure TForm1.Button1Click;  
const  
  FileName = 'C:\YourFile.mid';  
begin  
  MCISendString(PChar('play ' + FileName), nil, 0, 0);  
end;  

// Остановить проигрывание Midi  
procedure TForm1.Button1Click;  
const  
  FileName = 'C:\YourFile.mid';  
begin  
  MCISendString(PChar('stop ' + FileName), nil, 0, 0);  
end;

Автор: Pathfider 14.7.2004, 17:18

Pakshin A. S. мне кажется что MediaPlayer лучше - не надо особенно подбирать тип звукового файла, но вот размер - это да.

Автор: Pakshin A. S. 14.7.2004, 18:39

А что, *.mid PlaySound'ом не поддерживаются?