Gravar vídeo de WebCam

[maikel]

Olá colegas

Estou trabalhando com um software que captura vídeo/imagens de WebCam.

Tenho um código que ao ligar a câmera captura o vídeo e transmite o mesmo no Handle

de um componente panel, ao qual o vídeo fica passando ininterruptamente. Já implementei

o código necessário para capturar uma imagem e salvar em JPG no disco, o que gostaria de

fazer agora é disparar uma rotina para capturar o vídeo dessa WebCam, como por exemplo

salvar o Handle do panel em um formato *.avi ou *.mpg (ou outros formatos de vídeo).

Não estou usando componentes terceiros para capturar o vídeo da WebCam e jogar o mesmo

ao Handle do Panel. Utilizo rotinas de código puro em Delphi 7.

Se alguém puder me ajudar, agradeço.

Att

[Micheus]

Não estou usando componentes terceiros para capturar o vídeo da WebCam e jogar o mesmo ao Handle do Panel. Utilizo rotinas de código puro em Delphi 7.

maikel, você estaria fazendo uso de recursos da DLL VideoCap (AVICAP32.dll)? Se for, dê uma olhada na mensagem WM_CAP_FILE_SAVEAS. Veja como usá-la com uma função extraída da unit AviCap.pas (655linhas de interface para acessar AVICAP32.DLL):

function capFileSaveAs(hwnd:THandle; szName:LongInt):LongInt;
begin
  Result := SendMessage(hwnd, WM_CAP_FILE_SAVEAS, 0, szName);
end;

hwnd é o handler alocado para a janela de visualização (não o handler do Panel). Faça um teste

Abraços