dammit

Друзья, столкнулся  с проблемой, описанной в посте 

Хочу предложить свое решение (может кому пригодится).

Чтобы центр масштабирования был именно в центре объекта (в моем случае это TImage), необходимо после масштабирования установить свойство Align = TAlignLayout.Center, причем до этого нужно установить его в TAlignLayout.None !

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

  Image1.Scale.X:= 1.3;
  Image1.Scale.Y:= 1.3;
  Image1.Align:= TAlignLayout.None;
  Image1.Align:= TAlignLayout.Center;

В этом случае будет эффект увеличения объекта из центра. Если убрать строчку "Image1.Align:= TAlignLayout.None;" - увеличение будет из левого верхнего угла. На мой взгляд некорректное поведение платформы. Возможно в будущих релизах это поправят.

Embarcadero® Delphi 10.1 Berlin Update 2 Version 24.0.25048.9432  

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

var Player: JMediaPlayer;

...

Player:=TJMediaPlayer.Create;

Player.setVolume(0,0);

...

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

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

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

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

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

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

Есть))

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

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

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

Приложение для 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 необходимо использовать для этого?

Спасибо.