Просмотр исходного кода

* fixed wrong define which caused the unit to be empty

florian 22 лет назад
Родитель
Сommit
ba620e2d1f
1 измененных файлов с 5 добавлено и 2 удалено
  1. 5 2
      rtl/win32/messages.pp

+ 5 - 2
rtl/win32/messages.pp

@@ -3,9 +3,12 @@ unit messages;
 
 interface
 
-{$DEFINE ReadInterface}
+  uses
+    windows;
+
+{$DEFINE read_interface}
 {$I messages.inc}
 
 implementation
 
-end.
+end.