Leadtools.Multimedia Namespace > CaptureCtrl Class : SaveStillBitmap Method |
'Declaration Public Overridable Sub SaveStillBitmap( _ ByVal fileName As String, _ ByVal format As StillFormatType, _ ByVal quality As Integer, _ ByVal flags As Integer, _ ByVal timeOut As Integer _ )
'Usage Dim instance As CaptureCtrl Dim fileName As String Dim format As StillFormatType Dim quality As Integer Dim flags As Integer Dim timeOut As Integer instance.SaveStillBitmap(fileName, format, quality, flags, timeOut)
The following methods can also be used to obtain still images:
Imports Leadtools Imports Leadtools.Multimedia Imports LeadtoolsMultimediaExamples.Fixtures Public _form As CaptureCtrlForm = New CaptureCtrlForm() Public _capturectrl As CaptureCtrl = Nothing Public _result As Boolean = False Public Sub SaveStillBitmapExample() ' reference the capture control _capturectrl = _form.CaptureCtrl ' output file Dim jpgFile As String = Path.Combine(LEAD_VARS.MediaDir, "CaptureCtrl_SaveStillBitmap.jpg") Try ' select a video capture device If _capturectrl.VideoDevices("USB") Is Nothing Then Throw New Exception("No USB video device available") End If _capturectrl.VideoDevices("USB").Selected = True ' set a video compressor for the capture file _capturectrl.VideoCompressors.Mpeg4.Selected = True ' start the capture _capturectrl.StartCapture(CaptureMode.Still) ' save the still image to a jpeg file _capturectrl.SaveStillBitmap(jpgFile, StillFormatType.JPEG444, 9, 0, -1) ' stop the capture _capturectrl.StopCapture() ' check for the capture file and set the result If File.Exists(jpgFile) Then _result = True End If Catch e1 As Exception _result = False End Try End Sub Public NotInheritable Class LEAD_VARS Public Const MediaDir As String = "C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 18\Media" End Class
using Leadtools; using Leadtools.Multimedia; using LeadtoolsMultimediaExamples.Fixtures; public CaptureCtrlForm _form = new CaptureCtrlForm(); public CaptureCtrl _capturectrl = null; public bool _result = false; public void SaveStillBitmapExample() { // reference the capture control _capturectrl = _form.CaptureCtrl; // output file string jpgFile = Path.Combine(LEAD_VARS.MediaDir,"CaptureCtrl_SaveStillBitmap.jpg"); try { // select a video capture device if (_capturectrl.VideoDevices["USB"] == null) throw new Exception("No USB video device available"); _capturectrl.VideoDevices["USB"].Selected = true; // set a video compressor for the capture file _capturectrl.VideoCompressors.Mpeg4.Selected = true; // start the capture _capturectrl.StartCapture(CaptureMode.Still); // save the still image to a jpeg file _capturectrl.SaveStillBitmap(jpgFile, StillFormatType.JPEG444, 9, 0, -1); // stop the capture _capturectrl.StopCapture(); // check for the capture file and set the result if (File.Exists(jpgFile)) _result = true; } catch (Exception) { _result = false; } } static class LEAD_VARS { public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 18\Media"; }