'We assume that the GdViewer1 control has been properly integrated.
Friend WithEvents GdViewer1 As GdPicture14.GdViewer
'Add the event.
AddHandler GdViewer1.AnnotationAddedByUser, AddressOf GdViewer1_AnnotationAddedByUser
'Define the event.
Sub GdViewer1_AnnotationAddedByUser(ByVal AnnotationIdx As Integer) Handles GdViewer1.AnnotationAddedByUser
Dim annot As GdPicture14.Annotations.Annotation = GdViewer1.GetAnnotationFromIdx(AnnotationIdx)
annot.Author = "GdPicture"
If TypeOf annot Is GdPicture14.Annotations.AnnotationStickyNote OrElse
TypeOf annot Is GdPicture14.Annotations.AnnotationText Then
GdViewer1.DisplayTextEditBox(AnnotationIdx)
End If
End Sub
//We assume that the GdViewer1 control has been properly integrated.
//Add the event.
GdViewer1.AnnotationAddedByUser += GdViewer1_AnnotationAddedByUser;
//Define the event.
void GdViewer1_AnnotationAddedByUser(int AnnotationIdx)
{
GdPicture14.Annotations.Annotation annot = GdViewer1.GetAnnotationFromIdx(AnnotationIdx);
annot.Author = "GdPicture";
if (annot is GdPicture14.Annotations.AnnotationStickyNote ||
annot is GdPicture14.Annotations.AnnotationText)
{
GdViewer1.DisplayTextEditBox(AnnotationIdx);
}
}
