diff --git a/components/synedit/synedit.pp b/components/synedit/synedit.pp
index 1e0b6ab50c..fb81e7f817 100644
--- a/components/synedit/synedit.pp
+++ b/components/synedit/synedit.pp
@@ -10611,7 +10611,7 @@ var
   s: string;
   ClipHelper: TSynClipboardStream;
 begin
-  if (not SelAvail) then exit;
+  if (Data = nil) or (not SelAvail) then exit;
   s:=SelText;
   if s = ''  then
     exit;