[aconso]

Código Delphi [-]
      


 //Este es el codigo fuente
//Programa que reproduce un mp3 con un boton , el mp3 debe estar empaquetado en la misma APK
//se coloca el archivo mi_gato.mp3 en el subiderectorio del codigo fuente : /assets/mi_gato.mp3
//se tiene instalado el API 35
//Se tiene instalado el SDK
//Se tiene instalado el java
//Se tiene instalado el JDK
//Se tiene instalado el NDK

unit Unit1;

interface

uses
  Androidapi.JNIBridge, Androidapi.JNI.JavaTypes, FMX.Forms, FMX.Controls,
  FMX.Types, FMX.StdCtrls, System.Classes, System.SysUtils, FMX.Media,
  FMX.Controls.Presentation;

type
  TForm1 = class(TForm)
    procedure PlayButtonClick(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
    FMediaPlayer: TMediaPlayer;
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.fmx}

procedure TForm1.Button1Click(Sender: TObject);
begin
  // Inicializar el reproductor de medios
  if FMediaPlayer = nil then
    FMediaPlayer := TMediaPlayer.Create(Self);

  // Establecer la fuente del audio desde los assets del APK
FMediaPlayer.FileName := TPath.Combine(TPath.GetDocumentsPath, 'assets/mi_gato.mp3');

  // Reproducir el sonido
  FMediaPlayer.Play;
end;



end.