Here is one way to save the video file first frame to a jpg file:
procedure TForm1.SaveFirstFrame1Click(Sender: TObject);
var
iIEBitmap: TIEBitmap;
begin
if SavePictureDialog1.Execute then
begin
iIEBitmap := TIEBitmap.Create;
try
iIEBitmap.Assign(ImageEnMView1.GetTIEBitmap(0));
iIEBitmap.Write(SavePictureDialog1.FileName);
ImageEnMView1.ReleaseBitmap(0);
finally
iIEBitmap.Free;
end;
end;
end;
Another way is:
ImageEnMView1.GetImageToFile(0, SavePictureDialog1.FileName);
Bill Miller
Adirondack Software & Graphics
Email: w2m@hughes.net
EBook: http://www.imageen.com/ebook/
Custom Commercial ImageEn Development
Search
