Как включить/выключить звук у MediaPlayer?

[dammit]

Приложение для Android.

Воспроизведение mp3 реализовано с помощью компонента TMediaPlayer следующим образом:

procedure TForm1.operandButton1Click(Sender: TObject);
begin
//...

  if correctAnswer then begin
    MediaPlayer1.FileName:= System.IOUtils.TPath.GetDocumentsPath+PathDelim+'CorrectAnswer.mp3';
    MediaPlayer1.Play;  //  проиграем звук
  end;

//...

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

Подскажите, какие методы TMediaPlayera необходимо использовать для этого?

Спасибо.

[Равиль Зарипов (ZuBy)]

там разве нет Volume?

[dammit]

Есть))

Но не работает! К примеру, на Image, который выключает звук, такой код:

procedure TForm1.volumeOffImageClick(Sender: TObject);
begin
    MediaPlayer1.Volume:= 0;
end;

После нажатия на такой Image звук все равно есть...

[Равиль Зарипов (ZuBy)]

а у TImage стоит HitTest := true;?

[dammit]

Равиль, да, HitTest:= true;

Пробовал добавить в обработчик нажатия на volumeOffImage другие действия - все отрабатывает.

Даже не знаю, что за косяк... Может быть, когда я записываю в MediaPlayer1.FileName какую нибудь строку, то автоматически Volume включается?

К примеру, после этой строки:

MediaPlayer1.FileName:= System.IOUtils.TPath.GetDocumentsPath+PathDelim+'CorrectAnswer.mp3';

[dammit]

Попробовал поработать с нативным медиаплеером Android - TJMediaPlayer.

var Player: JMediaPlayer;

...

Player:=TJMediaPlayer.Create;

Player.setVolume(0,0);

...

Но один хрен - звук не выключается =)

 

Изменено 11 марта, 2017 пользователем dammit

[valdemar]

В 08.03.2017 в 16:33, dammit сказал:

Равиль, да, HitTest:= true;

Пробовал добавить в обработчик нажатия на volumeOffImage другие действия - все отрабатывает.

Даже не знаю, что за косяк... Может быть, когда я записываю в MediaPlayer1.FileName какую нибудь строку, то автоматически Volume включается?

К примеру, после этой строки:

MediaPlayer1.FileName:= System.IOUtils.TPath.GetDocumentsPath+PathDelim+'CorrectAnswer.mp3';

Вообще да, нужно после каждого открытия файла ставить в 0 громкость. Плеер берёт из файла максимальную громкость.

MediaPlayer1.FileName:=file_;

MediaPlayer1.Volume :=0;

MediaPlayer1.Play;