Changeset 568 for trunk/Settings.lfm

Timestamp:

May 13, 2024, 6:00:06 PM (5 weeks ago)

Author:

chronos

Message:

• Fixed: Custom draw ListBox items to keep consistent style on Linux.
• Fixed: Last game name index error if no saved games.

File:

• trunk/Settings.lfm (modified) (8 diffs)

trunk/Settings.lfm

@@ -9 +9 @@
   ClientWidth = 483
   Color = clBtnFace
+  DesignTimePPI = 144
   Font.Color = clWindowText
   Font.Height = -11
   Font.Name = 'MS Sans Serif'
-  DesignTimePPI = 144
   FormStyle = fsStayOnTop
   OnClose = FormClose
@@ -22 +22 @@
   LCLVersion = '2.2.6.0'
   Scaled = False
-  object ListLanguages: TListBox
+  object ListLanguages: TListBoxEx
     Tag = 15360
     Left = 16
@@ -36 +36 @@
     Font.Style = [fsBold]
     IntegralHeight = True
-    ItemHeight = 0
+    ItemHeight = 20
     ParentFont = False
     ScrollWidth = 144
@@ -93 +93 @@
     ButtonIndex = 0
   end
-  object ListKeyBindings: TListBox
+  object ListKeyBindings: TListBoxEx
     Tag = 15360
     Left = 176
@@ -107 +107 @@
     Font.Style = [fsBold]
     IntegralHeight = True
-    ItemHeight = 0
-    OnSelectionChange = ListKeyBindingsSelectionChange
+    ItemHeight = 20
     ParentFont = False
     ScrollWidth = 288
@@ -114 +113 @@
     TabStop = False
     TopIndex = -1
+    OnSelectionChange = ListKeyBindingsSelectionChange
   end
   object EditShortCutPrimary: TEdit
@@ -127 +127 @@
     Font.Name = 'Times New Roman'
     Font.Style = [fsBold]
-    OnKeyUp = EditShortCutPrimaryKeyUp
     ParentFont = False
     TabOrder = 2
+    OnKeyUp = EditShortCutPrimaryKeyUp
   end
   object EditShortCutSecondary: TEdit
@@ -143 +143 @@
     Font.Name = 'Times New Roman'
     Font.Style = [fsBold]
-    OnKeyUp = EditShortCutSecondaryKeyUp
     ParentFont = False
     TabOrder = 3
+    OnKeyUp = EditShortCutSecondaryKeyUp
   end
   object ButtonReset: TButtonA