主题：用foxtable照相的代码

近期更新的foxtable，为了配合用户的需求，增加了照相功能。

示例代码：

Dim c As new camera
c.capture() '开始照相
If c.image IsNot Nothing Then '照相成功
    c.Save("c:\data\abc.jpg") ‘保存文件
End If