Можно ли прогрывать 1 файл без остановки, то есть зацикливанием

Mew Возможно, но не уверен.

Хм, как только закончится - запускай его снова...

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

С помощью чего проигрываешь?

Ну мой пропитый мозг даёт такое решение:
Проверяем длинну файла, и по таймеру в момент окончания файла запускаеим его снова(Мож вечером примерчик накидаю, щас думать в лом).

Код

uses    MMSystem; playsound('C:\WINDOWS\Media\Windows XP - входящий звонок.wav', 0, SND_FILENAME Or SND_ASYNC Or SND_NODEFAULT Or SND_LOOP);

О функции почитай здесь: http://mech.math.msu.su/~vfnik/WinApi/p/playsound.html

самое просто что могу предложить :

Код

procedure TForm1.FormActivate(Sender: TObject); begin MMPlay.FileName := 'Gong.wav'; MMPlay.Open; MMPlay.Play; Tag := 0; while Tag <> 10 do  begin   MMPlay.Play;   Application.ProcessMessages;  end; close; end; procedure TForm1.Button1Click(Sender: TObject); begin Tag := 10; end;

паузы зависят от структуры проигрываемого файла...

DonPager А для чего, ты используешь таги?

Если вы хотите сделать через MediaPlayer то тогда так:

Код

procedure TForm1.Button3Click(Sender: TObject); begin  with MediaPlayer1 do begin    FileName:= 'C:\WINDOWS\Media\Windows XP - входящий звонок.wav';    Open;    Play;  end; end; procedure TForm1.MediaPlayer1Notify(Sender: TObject); begin  with MediaPlayer1 do if NotifyValue = nvSuccessful then begin    Notify := True;    Play;  end; end;

А как сделать чтобы между проигрыванием паузы не было. т.е. когда он заканчивается нет паузы, он просто мягко начинается снова без паузы

обрезать паузу вначале и в конце файла

а как понять обрезать

открыть файл в звуковом редакторе и обрезать.

А если он уже обрезан, а паузы остаются

пришли мне файл

Alex Гениально!

Mew Скорей всего, просто MediaPlayer сам делает Паузу!

Глупый вопрос, конечно.
но как обойти mediaplayer,

Mew
1. Сформулируй кратки вопрос.
2. Здеся!

Это называется, послать человека куда подальше

Создай два mediaplayer сначала запусти первый а потом за секундк до окончания первого запусти второй, паузы быть не должно

Хорошо я попробую

Привет! Я Сергей , мне нужна помощ в программировании микшера ( смесителя звука ).
Подробней , нужны рабочии процедурки на Delphi5-6 , "без лишних понтов великих программистов" , тоесть нужна коротко сама суть:
1) снять стерео сигнал с микшера ;
2) регулировать уровень записи с микшера ;
3) после , поместить этот сигнал в массив ;
4) затем , поместить массив в "MCISendString(play..." на воспроизведение;
5) далее , регулировать урровень громкости
воспроизведения ;
6) регулировать низкие и высокие частоты при воспроизведении ;

P.S. : пожалуйсто в отдельные процедурки закоментированные для использования в программе на Delphi5-6.
С Уважением Сергей.

Модератор: Пожалуйста, один топик - один вопрос.
По правилам форума, нужно создать отдельные темы по этим вопросам (а не писать вопрос в первую попавшуюся тему)...