From f7576c62e0e669b0de52e0c8815e2656e06f1506 Mon Sep 17 00:00:00 2001
From: skalogryz <skalogryz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Tue, 15 Dec 2020 19:00:35 +0000
Subject: [PATCH] richmemo: win32 fix compliation for the older versions of fpc

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

diff --git a/components/richmemo/win32/win32richmemoproc.pas b/components/richmemo/win32/win32richmemoproc.pas
index 4b869015d..2cf9dc93c 100644
--- a/components/richmemo/win32/win32richmemoproc.pas
+++ b/components/richmemo/win32/win32richmemoproc.pas
@@ -1062,7 +1062,7 @@ begin
     try
       l := LinkNotify.chrg.cpMax - LinkNotify.chrg.cpMin;
       SetSelection(RichEditWnd, LinkNotify.chrg.cpMin, l);
-      st := TStringStream.Create;
+      st := TStringStream.Create('');
       hp := '';
       try
         SaveRichText(RichEditWnd, st, SFF_SELECTION);