🚀 go-pugleaf

Hi !

You need to use the TPicture::RegisterFileFormat function to enable using
JPEG.
Then use a TJPEGImage instance in a TImage.
Copy your BMP picture in the TImage and save it as JPEG with the TJPEGImage
class.

It should work :)

"Corey Murtagh" <no_uce_emonk@slingshot.co.nz> a �crit dans le message news:
3cc89f18_1@dnews...
> Hi Mike,
>
> "Mike Browne" <mfbrowne@netcom.ca> wrote in message
> news:3cc8807a$1_1@dnews...
> > Can anyone point me to some  sample code that would show me how to
capture
> a
> > frame from a video camera in jpg format. I have been using the
> > capFileSaveDIB but I would like to save in a jpg format instead of a BMP
> > format.
> >
> > Thanks for any help
>
> Sorry, no sample code.  But...
>
> You can get the video driver to send frames to a callback function using
> capSetCallbackOnFrame.  The callback function is defined as:
>
> LRESULT CALLBACK capVideoStreamCallback(
>   HWND hWnd,
>   LPVIDEOHDR lpVHdr
> );
>
> All the data you should need on the frame is in the VIDEOHDR struct,
> including whether it's a keyframe, the locked memory area it's in, how
big,
> etc.  From memory (it's been a while) the frame data is in whatever
capture
> format your camera uses, so you might have to decode that back to bitmap
> before you encode to jpeg.
>
> Let us know how you get on anyway.
>
> --
> Corey Murtagh
> The Electric Monk
> "Quidquid latine dictum sit, altum viditur."
>
>