在Visual Basic中将IMAQ 1394图像存储到磁盘上

主要软件:
主要软件版本: N/A
主要软件修正版本: N/A
次要软件: N/A

问题: 我如何在Visual Basic中获得IMAQ 1394的图像，然后将图像存储到文件中呢？

解答:
如果要使用Visual Basic从1394摄像头中获取图像并把图像存储到文件中，请按照下面步骤：

1. 使用imaq1394SnapCW函数来获得数据类型为CWIMAQImage的图像
2. 在Visual Basic表单上放置一个CWIMAQ Vision对象
3. 使用下面介绍的其中一种方法将采集到的图像保存为一个文件：
   • WriteImageFile
   • WriteBMPFile
   • WritePNGFile
   • WriteTIFFFile
   • WriteJPEGFile
   • WriteJPEG2000File

您能够在下面的的帮助文件中找到更多的细节的信息，这些文件在Start菜单下的 Programs»National Instruments»Vision»Documentation:

• NI-IMAQ for IEEE 1394 Cameras Function Reference Help
• NI Vision for Visual Basic Reference Help

关于如何在Visual Basci环境下从1394摄像头下获得图像的例子可以在以下位置找到。

• C:\Program Files\National Instruments\NI-IMAQ for IEEE-1394\Examples\VB\Snap1394

下面是这个范例代码:

Private Sub Snap_Click()
CWIMAQViewer1.Attach myImage

errorCode = imaq1394CameraOpen2(Interface.Text, IMG1394_CAMERA_MODE_CONTROLLER, sid)

If (errorCode <> IMG1394_ERR_GOOD) Then
GoTo Error
End If

errorCode = imaq1394SnapCW(sid, myImage)

If (errorCode <> IMG1394_ERR_GOOD) Then
GoTo Error
End If

errorCode = CWIMAQVision1.WriteJPEG2000File(myImage, "C:\1394Image.jpg")

If (errorCode <> IMG1394_ERR_GOOD) Then
GoTo Error
End If

Error:
If (errorCode <> IMG1394_ERR_GOOD) Then
Dim errorMessage As String
Call imaq1394ShowErrorCW(errorCode, errorMessage)
MsgBox errorMessage
End If

Call imaq1394Close(sid)
End Sub


相关链接:

附件:





报告日期: 12/08/2006
最近更新: 12/08/2006
文档编号: 3W6FHLS4