Ver Mensaje Individual
  #1  
Antiguo 11-05-2010
alquimista alquimista is offline
Miembro
 
Registrado: ene 2008
Posts: 203
Reputación: 17
alquimista Va por buen camino
Dichoso boton Play de TMediaplayer

Muy buenas..

Tengo un problemilla que seguro tendrá fácil solución, pero no la veo.

He puesto un Tmediaplayer para tocar mp3 y le doy la orden Play, pero no se desactiva el botón de play.
Me explico mejor..
He dejado 3 botones del Tmediaplayer el play, pausa y stop.
Al seleccionar un mp3 con doble clic se pone en marcha la música y debería de desactivarse el play y activarse los botones de pausa y stop.

Pues esto no me pasa y tengo que pulsar con el ratón el play para que pase lo anterior.

El código que uso es:

Código:
  with mp3player do
    begin
     Close;
     FileName:=mp3File; //ruta del archivo mp3

     Open;
     SetMPVolume(mp3Player, TBvolumen.Position); // volumen de la musica

     Play;  // pongo en marcha la reproducción
     
     //Autoenable:=false;
     // EnabledButtons := [BtPause,BtStop]; //intento de hacer algo con los botones sin éxito
     //Autoenable:=true;
    end;
A ver si alguien me puede dar una solución.
Se que podria crear botones bitbtn, etc... , pero es por si se puede hacer con el control TMediaPlayer.

Un saludo a todos los genios de Clubdelphi
Responder Con Cita