Delphi - Capturar imagen de video

   
Vista:

Capturar imagen de video

Publicado por Gargol (1 intervención) el 06/03/2008 15:03:17
Necesito capturar una imagen de un frame de un video que se esta reproduciendo en delphi con el tmediaplayer pero no tengo ni la menor idea de como se hace.

de antemano muchas gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Capturar imagen de video

Publicado por Roberto Garcia (21 intervenciones) el 08/03/2008 13:08:43
Bueno, Supongo que ya habras logrado mostrar el video en un componente contenedor como un panel en el formulario pones la propiedad Left y Top del componente donde muestras el video a 0.

El siguiene fragmento de codigo se tiene que hacer antes de la caputra, lo puedes colocar en el OnShow o OnCreate del formulario o al hacer clic en el boton de captura pero antes de la captura.

with MediaPlayer1 do
begin
Display:=Panel1;
Panel1.Width:=DisplayRect.Right;
Panel1.Height:=DisplayRect.Bottom;
Image1.Height:=Panel1.Height;
Image1.Width:=Panel1.Width;
end;

Y el siguiente fragmento lo ponen en el boton que hace la captura

Image1.Canvas.CopyRect(Image1.ClientRect,Self.Canvas,Panel1.ClientRect);

Esta forma ha funcionado al gunas veces pero por alguna razon falla en algunas Computadoras y no se ha descubierto si es problema de la tarjeta de video o de los codecs de windows.

Pruebalo y nos cuentas
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar