Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Desarrollo en Delphi para Android (https://www.clubdelphi.com/foros/forumdisplay.php?f=57)
-   -   Problemas al reproducir sonido con TMediaPlayer en Android (C++) (https://www.clubdelphi.com/foros/showthread.php?t=96540)

Drummer 13-12-2023 15:15:11

Problemas al reproducir sonido con TMediaPlayer en Android (C++)
 
Buenas

0

Para reproducir mi problema de la forma más sencilla: creo un formulario que contiene un botón y al hacer clic en él se genera un hilo donde se reproduce un sonido en bucle.

Cita:

void __fastcall TForm2::Button1Click(TObject *Sender)
{
TRecitar *Recitar = new TRecitar(false);
}

Cita:

class TRecitar : public TThread
{
private:
UnicodeString PathGhost;

protected:
void __fastcall Execute();
public:

__fastcall TRecitar(bool CreateSuspended);

};


__fastcall TRecitar::TRecitar(bool CreateSuspended)
: TThread(CreateSuspended)
{
PathGhost=System::Ioutils::TPath::GetDocumentsPath()+"/";
}

void __fastcall TRecitar::Execute()
{
FreeOnTerminate = true;

UnicodeString Audio;

TMediaPlayer *Pl;

for(int i=1;i<150;i++)
{
Audio = PathGhost + "Multimedia/SonG.3gp";

Pl->FileName = Audio;
Pl->Play();
sleep(1);
Pl->Stop();
Pl->Clear();
}
}
Al iniciar el proceso, el sonido se reproduce en bucle hasta un número determinado de veces (en mi caso 40), y luego deja de “escucharse”, pero el bucle sigue corriendo sin dar ningún tipo de error (simplemente no se reproduce el sonido).

He probado mil cosas pero no encuentro el error... puede ser un problema en mi android... ... ¿Alguna idea?

Nota: He intentado inicializar el puntero TMediaPlayer de la forma : new TMediaPlayer () y new TMediaPlayer (this) y ninguna de las dos es compatible con el componente...creo que se inicializa cuando se le asigna el Nombre del archivo a reproducir.

Drummer 27-12-2023 12:02:14

Buenas

Finalmente el problema es que no había inicializado el componente TMediaPlayer de la forma:

Código:

new TMediaPlayer(nullptr)


La franja horaria es GMT +2. Ahora son las 01:13:22.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi