Cita:
Empezado por daniel43
Hola amigos del Club Delphi:
Mi pregunta es acerca de videos en delphi 2010 (Uso embarcadero rad studio 2010), lo que quiero saber es si se puede hacer que al escribir una palabra en un TEdit se reproduzca en un TMediaPlayer un video con el nombre de la palabra y la extension .mpg, por ejemplo, yo escribo en el TEdit 'Hola' y el programa busca un archivo que se llama 'Hola.mpg' y lo reproduce, y despues de reproducirlo poder buscar mas.
Yo lo intente y este es mi codigo pero por alguna razon no funciona
procedure TForm1.Button1Click(Sender: TObject);
begin
mediaplayer1.Open;
mediaplayer1.Visible:=True;
mediaplayer1.FileName:='C:\Users\Daniel\Desktop\'+edit1.Text+'.mpg'; mediaplayer1.Play;
end ;
Gracias de Antemano.
|
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 ;