[Windows Mobile] 调用摄像头的代码

最新推荐文章于 2010-09-21 09:52:00 发布

原创最新推荐文章于 2010-09-21 09:52:00 发布 · 806 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#windows #mobile #exception

Visual Basic.Net 专栏收录该内容

1 篇文章

订阅专栏

本示例展示了一段VB.NET代码，用于实现一个简单的拍照功能。该代码通过设置CameraCaptureDialog对象的各种属性，如标题、模式、分辨率等，来实现静止图片的拍摄，并将拍摄到的图片显示在一个PictureBox控件中。如果出现异常，则会弹出消息框显示错误信息。

只有代码

        Try
            Dim ccd As CameraCaptureDialog
            ccd = New CameraCaptureDialog
            ccd.Title = "Capture Demo"
            ccd.Mode = CameraCaptureMode.Still
            ccd.Owner = Me
            ccd.Resolution = New Size(640, 480)
            ccd.StillQuality = CameraCaptureStillQuality.High
            ccd.InitialDirectory = "/My Documents"
            If ccd.ShowDialog() = Windows.Forms.DialogResult.OK And ccd.FileName <> "" Then
                picCapture.Image = New Bitmap(ccd.FileName)
            End If
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try