AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

DocumentViewer: hide disabled buttons

Browse Source
This commit is contained in:
Jonathan Jenne 2024-01-15 08:56:56 +01:00
parent d392ffb712
commit fb7f7aada3
1 changed files with 72 additions and 57 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

129
Controls.DocumentViewer/DocumentViewer.vb
View File

@ -646,6 +646,14 @@ Public Class DocumentViewer
Return oFormat Return oFormat
End Function End Function
Private Function ToVisibility(pBoolean As Boolean) As XtraBars.BarItemVisibility
If (pBoolean = True) Then
Return XtraBars.BarItemVisibility.Always
Else
Return XtraBars.BarItemVisibility.Never
End If
End Function
Private Sub UpdateMainUi() Private Sub UpdateMainUi()
Select Case _Config?.Config?.PageFit Select Case _Config?.Config?.PageFit
@ -663,68 +671,75 @@ Public Class DocumentViewer
Select Case _ViewerMode Select Case _ViewerMode
Case ViewerMode.GDPicture Case ViewerMode.GDPicture
buttonPrint.Enabled = _ToolbarSettings.ShowPrintButton ToolbarDocumentViewer.Visible = True
buttonFitWidth.Enabled = _ToolbarSettings.ShowFitWidthButton
buttonFitPage.Enabled = _ToolbarSettings.ShowFitPageButton buttonPrint.Visibility = ToVisibility(_ToolbarSettings.ShowPrintButton)
buttonZoomIn.Enabled = _ToolbarSettings.ShowZoomButton buttonFitWidth.Visibility = ToVisibility(_ToolbarSettings.ShowFitWidthButton)
buttonZoomOut.Enabled = _ToolbarSettings.ShowZoomButton buttonFitPage.Visibility = ToVisibility(_ToolbarSettings.ShowFitPageButton)
buttonRotateLeft.Enabled = _ToolbarSettings.ShowRotateButton buttonZoomIn.Visibility = ToVisibility(_ToolbarSettings.ShowZoomButton)
buttonRotateRight.Enabled = _ToolbarSettings.ShowRotateButton buttonZoomOut.Visibility = ToVisibility(_ToolbarSettings.ShowZoomButton)
buttonFlipX.Enabled = _ToolbarSettings.ShowFlipButton buttonRotateLeft.Visibility = ToVisibility(_ToolbarSettings.ShowRotateButton)
buttonFlipY.Enabled = _ToolbarSettings.ShowFlipButton buttonRotateRight.Visibility = ToVisibility(_ToolbarSettings.ShowRotateButton)
buttonSettings.Enabled = _ToolbarSettings.ShowSettingButton buttonFlipX.Visibility = ToVisibility(_ToolbarSettings.ShowFlipButton)
txtSearch.Enabled = _ToolbarSettings.ShowSearchButton buttonFlipY.Visibility = ToVisibility(_ToolbarSettings.ShowFlipButton)
btnSearch2.Enabled = _ToolbarSettings.ShowSearchButton buttonSettings.Visibility = ToVisibility(_ToolbarSettings.ShowSettingButton)
btnNextHighlight.Enabled = _ToolbarSettings.ShowSearchButton txtSearch.Visibility = ToVisibility(_ToolbarSettings.ShowSearchButton)
btnPrevHighlight.Enabled = _ToolbarSettings.ShowSearchButton btnSearch2.Visibility = ToVisibility(_ToolbarSettings.ShowSearchButton)
buttonFirstPage.Enabled = True btnNextHighlight.Visibility = ToVisibility(_ToolbarSettings.ShowSearchButton)
buttonPrevPage.Enabled = True btnPrevHighlight.Visibility = ToVisibility(_ToolbarSettings.ShowSearchButton)
buttonNextPage.Enabled = True buttonFirstPage.Visibility = ToVisibility(True)
buttonLastPage.Enabled = True buttonPrevPage.Visibility = ToVisibility(True)
txtCurrentPage.Enabled = True buttonNextPage.Visibility = ToVisibility(True)
buttonLastPage.Visibility = ToVisibility(True)
txtCurrentPage.Visibility = ToVisibility(True)
Case ViewerMode.RichText Case ViewerMode.RichText
buttonFitWidth.Enabled = _ToolbarSettings.ShowFitWidthButton ToolbarDocumentViewer.Visible = True
buttonFitPage.Enabled = _ToolbarSettings.ShowFitPageButton
buttonZoomIn.Enabled = _ToolbarSettings.ShowZoomButton
buttonZoomOut.Enabled = _ToolbarSettings.ShowZoomButton
buttonNextPage.Enabled = True
buttonPrevPage.Enabled = True
buttonPrint.Enabled = False buttonFitWidth.Visibility = ToVisibility(_ToolbarSettings.ShowFitWidthButton)
buttonRotateLeft.Enabled = False buttonFitPage.Visibility = ToVisibility(_ToolbarSettings.ShowFitPageButton)
buttonRotateRight.Enabled = False buttonZoomIn.Visibility = ToVisibility(_ToolbarSettings.ShowZoomButton)
buttonFlipX.Enabled = False buttonZoomOut.Visibility = ToVisibility(_ToolbarSettings.ShowZoomButton)
buttonFlipY.Enabled = False buttonNextPage.Visibility = ToVisibility(True)
buttonFirstPage.Enabled = False buttonPrevPage.Visibility = ToVisibility(True)
buttonLastPage.Enabled = False buttonPrint.Visibility = ToVisibility(False)
buttonSettings.Enabled = False buttonRotateLeft.Visibility = ToVisibility(False)
txtCurrentPage.Enabled = False buttonRotateRight.Visibility = ToVisibility(False)
txtSearch.Enabled = False buttonFlipX.Visibility = ToVisibility(False)
btnSearch2.Enabled = False buttonFlipY.Visibility = ToVisibility(False)
btnNextHighlight.Enabled = False buttonFirstPage.Visibility = ToVisibility(False)
btnPrevHighlight.Enabled = False buttonLastPage.Visibility = ToVisibility(False)
buttonSettings.Visibility = ToVisibility(False)
txtCurrentPage.Visibility = ToVisibility(False)
txtSearch.Visibility = ToVisibility(False)
btnSearch2.Visibility = ToVisibility(False)
btnNextHighlight.Visibility = ToVisibility(False)
btnPrevHighlight.Visibility = ToVisibility(False)
Case ViewerMode.Excel Case ViewerMode.Excel
buttonPrint.Enabled = False ToolbarDocumentViewer.Visible = False
buttonFitWidth.Enabled = False
buttonFitPage.Enabled = False buttonPrint.Visibility = ToVisibility(False)
buttonZoomIn.Enabled = False buttonFitWidth.Visibility = ToVisibility(False)
buttonZoomOut.Enabled = False buttonFitPage.Visibility = ToVisibility(False)
buttonRotateLeft.Enabled = False buttonZoomIn.Visibility = ToVisibility(False)
buttonRotateRight.Enabled = False buttonZoomOut.Visibility = ToVisibility(False)
buttonFlipX.Enabled = False buttonRotateLeft.Visibility = ToVisibility(False)
buttonFlipY.Enabled = False buttonRotateRight.Visibility = ToVisibility(False)
buttonFirstPage.Enabled = False buttonFlipX.Visibility = ToVisibility(False)
buttonPrevPage.Enabled = False buttonFlipY.Visibility = ToVisibility(False)
buttonNextPage.Enabled = False buttonFirstPage.Visibility = ToVisibility(False)
buttonLastPage.Enabled = False buttonPrevPage.Visibility = ToVisibility(False)
buttonSettings.Enabled = False buttonNextPage.Visibility = ToVisibility(False)
txtCurrentPage.Enabled = False buttonLastPage.Visibility = ToVisibility(False)
txtSearch.Enabled = False buttonSettings.Visibility = ToVisibility(False)
btnSearch2.Enabled = False txtCurrentPage.Visibility = ToVisibility(False)
btnNextHighlight.Enabled = False txtSearch.Visibility = ToVisibility(False)
btnPrevHighlight.Enabled = False btnSearch2.Visibility = ToVisibility(False)
btnNextHighlight.Visibility = ToVisibility(False)
btnPrevHighlight.Visibility = ToVisibility(False)
End Select End Select
End Sub End Sub