thumbnails for element editor, better colors

This commit is contained in:
Jonathan Jenne
2023-12-04 10:36:00 +01:00
parent bdff38410c
commit b8471389b9
6 changed files with 210 additions and 34 deletions

View File

@@ -48,14 +48,7 @@ Partial Public Class frmFieldEditor
Throw New ArgumentNullException("GDPictureKey")
End If
DocumentViewer1.Init(LogConfig, GDPictureKey)
DocumentViewer1.LoadFile(Document.Filepath)
If DocumentViewer1.PdfViewer IsNot Nothing Then
GDViewer = DocumentViewer1.PdfViewer
Manager = GDViewer.GetAnnotationManager()
Manager.InitFromGdViewer(GDViewer)
End If
InitializeViewer()
SetReceiver(Receivers.First())
Dim oItems = Receivers.Select(AddressOf CreateBarItem).ToArray()
@@ -71,6 +64,22 @@ Partial Public Class frmFieldEditor
Next
'LoadAnnotations(SelectedReceiver.Id)
GDViewer.DisplayFirstPage()
ThumbnailEx2.LoadFromGdViewer(GDViewer)
ThumbnailEx2.Refresh()
End If
End Sub
Private Sub InitializeViewer()
DocumentViewer1.Init(LogConfig, GDPictureKey)
DocumentViewer1.LoadFile(Document.Filepath)
If DocumentViewer1.PdfViewer IsNot Nothing Then
GDViewer = DocumentViewer1.PdfViewer
Manager = GDViewer.GetAnnotationManager()
Manager.InitFromGdViewer(GDViewer)
Else
Logger.Warn("Viewer could not be initialized!")
End If
End Sub