Dario Sassi
25 lines
790 B
VB.net
25 lines
790 B
VB.net
Public Class CfgForm
|
|
|
|
Private Sub BtnOk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnOk.Click
|
|
Me.Hide()
|
|
End Sub
|
|
|
|
Private Sub BtnDisConnect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnDisConnect.Click
|
|
'Camera.Disconnect()
|
|
'SetFormStatus()
|
|
End Sub
|
|
|
|
Private Sub BtnSetID_Click(sender As System.Object, e As System.EventArgs) Handles BtnSetID.Click
|
|
FrmMain.SetDefaultCamera()
|
|
End Sub
|
|
|
|
Private Sub CfgForm_Activated(sender As Object, e As System.EventArgs) Handles Me.Activated
|
|
|
|
End Sub
|
|
|
|
Private Sub BtnResetID_Click(sender As System.Object, e As System.EventArgs) Handles BtnResetID.Click
|
|
FrmMain.SetDefaultCamera(True)
|
|
FrmMain.Camera.Connect()
|
|
End Sub
|
|
|
|
End Class |