Перейти к содержанию
Fire Monkey от А до Я

dammit

Пользователи
  • Постов

    5
  • Зарегистрирован

  • Посещение

  • Победитель дней

    1

dammit стал победителем дня 15 апреля 2018

dammit имел наиболее популярный контент!

Посетители профиля

Блок последних пользователей отключён и не показывается другим пользователям.

Достижения dammit

  1. Друзья, столкнулся с проблемой, описанной в посте Хочу предложить свое решение (может кому пригодится). Чтобы центр масштабирования был именно в центре объекта (в моем случае это 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
  2. Попробовал поработать с нативным медиаплеером Android - TJMediaPlayer. var Player: JMediaPlayer; ... Player:=TJMediaPlayer.Create; Player.setVolume(0,0); ... Но один хрен - звук не выключается =)
  3. Равиль, да, HitTest:= true; Пробовал добавить в обработчик нажатия на volumeOffImage другие действия - все отрабатывает. Даже не знаю, что за косяк... Может быть, когда я записываю в MediaPlayer1.FileName какую нибудь строку, то автоматически Volume включается? К примеру, после этой строки: MediaPlayer1.FileName:= System.IOUtils.TPath.GetDocumentsPath+PathDelim+'CorrectAnswer.mp3';
  4. Есть)) Но не работает! К примеру, на Image, который выключает звук, такой код: procedure TForm1.volumeOffImageClick(Sender: TObject); begin MediaPlayer1.Volume:= 0; end; После нажатия на такой Image звук все равно есть...
  5. Приложение для 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 необходимо использовать для этого? Спасибо.
×
×
  • Создать...