reload thumbnails after switching receivers
This commit is contained in:
@@ -62,11 +62,9 @@ Partial Public Class frmFieldEditor
|
||||
For Each oReceiver In Receivers
|
||||
LoadAnnotations(oReceiver.Id)
|
||||
Next
|
||||
'LoadAnnotations(SelectedReceiver.Id)
|
||||
GDViewer.DisplayFirstPage()
|
||||
|
||||
ThumbnailEx2.LoadFromGdViewer(GDViewer)
|
||||
ThumbnailEx2.Refresh()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
@@ -76,6 +74,9 @@ Partial Public Class frmFieldEditor
|
||||
|
||||
If DocumentViewer1.PdfViewer IsNot Nothing Then
|
||||
GDViewer = DocumentViewer1.PdfViewer
|
||||
AddHandler GDViewer.BeforeAnnotationAddedByUser, AddressOf Viewer_BeforeAnnotationAddedByUser
|
||||
AddHandler GDViewer.AnnotationAddedByUser, AddressOf Viewer_AnnotationAddedByUser
|
||||
|
||||
Manager = GDViewer.GetAnnotationManager()
|
||||
Manager.InitFromGdViewer(GDViewer)
|
||||
Else
|
||||
@@ -95,8 +96,6 @@ Partial Public Class frmFieldEditor
|
||||
Return oItem
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
Private Sub ReceiverItem_Click(sender As Object, e As ItemClickEventArgs)
|
||||
Me.SuspendLayout()
|
||||
|
||||
@@ -122,6 +121,8 @@ Partial Public Class frmFieldEditor
|
||||
DisplayPage(oCurrentPage)
|
||||
GDViewer.SetVScrollBarPosition(oCurrentPosition)
|
||||
GDViewer.Redraw()
|
||||
ThumbnailEx2.ReloadThumbnails()
|
||||
|
||||
TestViewerActionSuccessful("ReceiverItem_Click/Redraw")
|
||||
Else
|
||||
MsgBox(Resources.Envelope.Elements_could_not_be_saved, MsgBoxStyle.Critical, Text)
|
||||
@@ -144,22 +145,16 @@ Partial Public Class frmFieldEditor
|
||||
GDViewer.LockViewer = False
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub BarButtonItem1_ItemClick(sender As Object, e As ItemClickEventArgs) Handles BarButtonItem1.ItemClick
|
||||
If GDViewer IsNot Nothing Then
|
||||
|
||||
AddHandler GDViewer.BeforeAnnotationAddedByUser, AddressOf Viewer_BeforeAnnotationAddedByUser
|
||||
AddHandler GDViewer.AnnotationAddedByUser, AddressOf Viewer_AnnotationAddedByUser
|
||||
|
||||
GDViewer.AddStickyNoteAnnotationInteractive(SIGNATURE_LABEL, Color.Black, "Arial", FontStyle.Regular, 10, 1, 0)
|
||||
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Viewer_BeforeAnnotationAddedByUser(pAnnotationIdx As Integer)
|
||||
Dim oAnnotation As Annotation = GDViewer.GetAnnotationFromIdx(pAnnotationIdx)
|
||||
ApplyAnnotationStyleForNewAnnotation(oAnnotation, SelectedReceiver.Color)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btnSave_ItemClick(sender As Object, e As ItemClickEventArgs) Handles btnSave.ItemClick
|
||||
|
||||
Reference in New Issue
Block a user