diff --git a/source/main.pas b/source/main.pas
index a8b89bcd..4cecf2dc 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -10221,6 +10221,7 @@ begin
       try
         SynMemo.PasteFromClipboard;
         Success := True;
+        SynMemo.Modified := True;
       except on E:Exception do
         ErrorDialog(E.Message);
       end;