diff --git a/packages/rtl-console/src/win16/video.pp b/packages/rtl-console/src/win16/video.pp
index 12a57396fa..1e5953d8be 100644
--- a/packages/rtl-console/src/win16/video.pp
+++ b/packages/rtl-console/src/win16/video.pp
@@ -15,6 +15,9 @@
  **********************************************************************}
 unit video;
 
+{ smart callbacks: on }
+{$K+}
+
 interface
 
 uses