Industrial/LCDDisplay: Add handlers for OnKeyDown and OnMouseMove to CharDefs editor.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8316 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/industrialstuff/source/indlcddisplay_editorform.lfm

@@ -105,13 +105,13 @@ object LCDCharDefsEditor: TLCDCharDefsEditor
     Left = 176
     Height = 88
     Top = 57
-    Width = 87
+    Width = 89
     AutoSize = True
     BorderSpacing.Left = 5
     BorderSpacing.Right = 12
     BevelOuter = bvNone
     ClientHeight = 88
-    ClientWidth = 87
+    ClientWidth = 89
     TabOrder = 2
     object btReplace: TBitBtn
       AnchorSideLeft.Control = pnButtons
@@ -120,7 +120,7 @@ object LCDCharDefsEditor: TLCDCharDefsEditor
       Left = 0
       Height = 26
       Top = 31
-      Width = 87
+      Width = 89
       AutoSize = True
       BorderSpacing.Top = 5
       Caption = 'Replace'
@@ -140,7 +140,7 @@ object LCDCharDefsEditor: TLCDCharDefsEditor
       Left = 0
       Height = 26
       Top = 62
-      Width = 87
+      Width = 89
       Anchors = [akTop, akLeft, akRight]
       AutoSize = True
       BorderSpacing.Top = 5
@@ -160,7 +160,7 @@ object LCDCharDefsEditor: TLCDCharDefsEditor
       Left = 0
       Height = 26
       Top = 0
-      Width = 87
+      Width = 89
       Anchors = [akTop, akLeft, akRight]
       AutoSize = True
       Caption = 'Add as...'
@@ -188,7 +188,9 @@ object LCDCharDefsEditor: TLCDCharDefsEditor
     FixedRows = 0
     ScrollBars = ssNone
     TabOrder = 3
+    OnKeyDown = dgDotMatrixKeyDown
     OnMouseDown = dgDotMatrixMouseDown
+    OnMouseMove = dgDotMatrixMouseMove
     OnPrepareCanvas = dgDotMatrixPrepareCanvas
   end
   object ImageList1: TImageList