Cita:
Empezado por beginner01
prueba asi
Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); begin mediaplayer1.close; mediaplayer1.Visible:=True; mediaplayer1.FileName:='C:\Users\Daniel\Desktop\'+edit1.Text+'.mpg'; mediaplayer1.Open; mediaplayer1.Play; end ; |
Muchas Gracias Me Funcionó Perfecto!