Code: Select all
annotMgr = New AnnotationManager
annotMgr.InitFromGdPictureImage(imageID)
For i As Integer = 0 To annotMgr.GetAnnotationCount() - 1
Dim x As GdPictureStatus = annotMgr.DeleteAnnotation(i)
Next
annotMgr.Close()
Me.GdViewer1.DisplayFromGdPictureImage(imageID)
Me.GdViewer1.ReloadAnnotations()
Me.GdViewer1.Redraw()