瀏覽代碼

+ {$PACKSET 1} for windows units to improve delphi compatibility

git-svn-id: trunk@7686 -
florian 18 年之前
父節點
當前提交
fb1c8e5b1a
共有 3 個文件被更改,包括 6 次插入0 次删除
  1. 2 0
      rtl/win32/windows.pp
  2. 2 0
      rtl/win64/windows.pp
  3. 2 0
      rtl/wince/windows.pp

+ 2 - 0
rtl/win32/windows.pp

@@ -14,6 +14,8 @@
  **********************************************************************}
 unit windows;
 
+{$PACKSET 1}
+
 {$ifndef NO_SMART_LINK}
 {$smartlink on}
 {$endif}

+ 2 - 0
rtl/win64/windows.pp

@@ -14,6 +14,8 @@
  **********************************************************************}
 unit windows;
 
+{$PACKSET 1}
+
 {$ifndef NO_SMART_LINK}
 {$smartlink on}
 {$endif}

+ 2 - 0
rtl/wince/windows.pp

@@ -17,6 +17,8 @@
 
 unit windows;
 
+{$PACKSET 1}
+
 {$ifndef NO_SMART_LINK}
 {$smartlink on}
 {$endif}