Imports DigitalData.Modules.Logging

Public Class frmDocView
    Private LogConfig As LogConfig

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If String.IsNullOrEmpty(TextBox1.Text) Then
            If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
                TextBox1.Text = OpenFileDialog1.FileName
                DocumentViewer1.LoadFile(TextBox1.Text)
            End If
        Else
            DocumentViewer1.LoadFile(TextBox1.Text)
        End If

    End Sub

    Private Sub frmDocView_Load(sender As Object, e As EventArgs) Handles Me.Load
        LogConfig = New LogConfig(LogConfig.PathType.Temp)
        DocumentViewer1.Init(LogConfig, "21182889975216572111813147150675976632")
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        DocumentViewer1.Done()
    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        If DocumentViewer1.AddAnnotation("Some Text") Then
        End If
    End Sub

    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        DocumentViewer1.Save()
    End Sub
End Class