Пауза в компоненте MediaPlayer

[VladimirNew]

пытаюсь написать протенький аудио проиграватель на Delphi 7, использую компонент MediaPlayer.
проблемма в том, что по нажатию нужной кнопки, к которой такой код:

MediaPlayer1.pause;

кнопка ставит на стоп, таким образом воспроизведение песни приходится начинать с начала. что делать?

[spamer]

Возможности проверить сейчас нету, нот глянь вот тут и тут
И еще про метод Resume почитай...чего он там делает...

[VladimirNew]

чуток не то написал в теме...
полный код кнопки таков:

procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
  if SpeedButton2.Down then
       Play
  else
       begin
      MediaPlayer1.Pause;
      Timer1.Enabled := False;
      SpeedButton2.Down := False;
      SPeedButton2.Hint := 'Play';
    end;

end;

[Пепел Феникса]

а вы читали описание метода Pause?

Pauses playing or recording. If already paused when clicked, resumes playing or recording.

[VladimirNew]

а вы читали описание метода Pause?

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

[Пепел Феникса]

и что ж вы негодуете то?

черным по белому написано:

Ставит воспроизведение или запись на паузу. Если уже на паузе, то восстанавливает воспроизведение или запись.

[VladimirNew]

перевести я смог... а как же это реализовать?

[Пепел Феникса]

самое просто это через проверку состояния проигрывателя:

case MP.Mode of
 mpPlaying: begin 
                 MP.Pause;
                 //и остальное при нажатии пауза.
                end;
 mpPaused: begin
                  MP.Pause;
                  //и остальное при продолжении воспроизведения.
                 end;
 //etc

http://docs.embarcadero.com/products..._TMPModes.html
вот состояния проигрывателя.

+ кстати я думаю могли бы и сами отслеживать ситуацию что вы находитесь в паузе.