Add DPI Scaling to frmIndex, more logging in ClassFileDrop

This commit is contained in:
Jonathan Jenne
2021-04-06 17:11:25 +02:00
parent 03159797ab
commit f095914353
4 changed files with 17 additions and 8 deletions

View File

@@ -1720,11 +1720,13 @@ Public Class frmIndex
Private Sub LoadIndexe_Man()
Try
Dim oControlCount As Integer = 1
Dim oLabelPosition As Integer = 11
Dim oControlPosition As Integer = 33
Dim oControls As New DigitalData.GUIs.GlobalIndexer.ControlCreator(LOGCONFIG, pnlIndex, Me) With {
Dim oDpiscale = DigitalData.Modules.Windows.Screen.GetScalingFactor()
Dim oControlCount As Integer = 1
Dim oLabelPosition As Integer = 11 * oDpiscale
Dim oControlPosition As Integer = 33 * oDpiscale
Dim oControls As New ControlCreator(LOGCONFIG, pnlIndex, Me) With {
.OnControlChanged = AddressOf PrepareDependingControl,
.OnLookupData = AddressOf GetLookupData
}
@@ -1811,8 +1813,8 @@ Public Class frmIndex
End Select
oControlCount += 1
oLabelPosition += 50
oControlPosition += 50
oLabelPosition += 50 * oDpiscale
oControlPosition += 50 * oDpiscale
'make y as height in fom
Next
Dim oPanelHeight = oControlPosition - 30