From e893aa4eda1d1770c2703d423852b2cd0d3b05dd Mon Sep 17 00:00:00 2001
From: Martin <laz.git@mfriebe.de>
Date: Tue, 1 Apr 2025 13:38:27 +0200
Subject: [PATCH] SynEdit: Improve d8e4b249c35a22dcc0eef08e16d3939e11a1321e,
 initialize out variable. issue #41553

(cherry picked from commit ebd7f561701fc26ebcab55284b6a8d2e38b6edf5)
---
 components/synedit/synedittextbuffer.pp | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/components/synedit/synedittextbuffer.pp b/components/synedit/synedittextbuffer.pp
index 03d9b69976..c7f3b7597b 100644
--- a/components/synedit/synedittextbuffer.pp
+++ b/components/synedit/synedittextbuffer.pp
@@ -1147,9 +1147,10 @@ end;
 
 function TSynEditStringList.GetPChar(ALineIndex: Integer; out ALen: Integer): PChar;
 begin
-  ALen := 0;
-  if (ALineIndex = 0) and (Count = 0) then  // simulate empty line
-    Result := nil
+  if (ALineIndex = 0) and (Count = 0) then begin  // simulate empty line
+    ALen := 0;
+    Result := nil;
+  end
   else
     Result := FList.GetPChar(ALineIndex, ALen);
 end;