使用 Visual Basic 將 IMAQ 1394 的影像存檔到磁碟中
主要軟體:
主要軟體版本: 2.0.2
主要軟體修正版本:
次要軟體: N/A
問題: 我該如何將 IMAQ 1394 影像在Visual Basic 的環境下寫到檔案中
解答: 如果要使用Visual Basic從1394攝影機中獲取影像並把影像存儲到檔中,請按照下面步驟:
1. 使用imaq1394SnapCW函數來獲得資料類型為CWIMAQImage的影像
2. 在Visual Basic表單上放置一個CWIMAQ Vision物件
3. 使用下面介紹的其中一種方法將擷取到的影像存為一個檔案:
o WriteImageFile
o WriteBMPFile
o WritePNGFile
o WriteTIFFFile
o WriteJPEGFile
o WriteJPEG2000File
您能夠在下面的的HELP檔中找到更多的細節的資訊,這些檔在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
相關連結:
附加檔案:
報告日期: 04/07/2006
最後更新: 12/18/2007
文件偏號: 3W6FHLS4