From 9a0f172f52f3f87702b9f30a1c7a56790f2407d6 Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Mon, 20 Jun 2022 07:10:40 +0000
Subject: [PATCH] Industrial/LCDDisplay: Fix crash in ClearEditorGrid.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8320 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/industrialstuff/source/indlcddisplay_editorform.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/industrialstuff/source/indlcddisplay_editorform.pas b/components/industrialstuff/source/indlcddisplay_editorform.pas
index 864d756e0..b3921d006 100644
--- a/components/industrialstuff/source/indlcddisplay_editorform.pas
+++ b/components/industrialstuff/source/indlcddisplay_editorform.pas
@@ -357,7 +357,7 @@ procedure TLCDCharDefsEditor.ClearEditorGrid;
 var
   i: integer;
 begin
-  for i := 0 to High(FTmpDotRows[i]) do
+  for i := 0 to High(FTmpDotRows) do
     FTmpDotRows[i] := 0;
 end;