فهرست منبع

* Fixed bug #26053 (NoErrMsg variable for Delphi compatibility)

git-svn-id: trunk@27764 -
michael 11 سال پیش
والد
کامیت
4258d71a2d
1فایلهای تغییر یافته به همراه2 افزوده شده و 1 حذف شده
  1. 2 1
      rtl/inc/systemh.inc

+ 2 - 1
rtl/inc/systemh.inc

@@ -673,7 +673,8 @@ const
 var
 {$endif FPC_HAS_FEATURE_DYNLIBS}
   IsConsole : boolean = false; public name 'operatingsystem_isconsole';
-
+  NoErrMsg: Boolean platform = False; // For Delphi compatibility, not used in FPC.
+  
   DefaultSystemCodePage,
   DefaultUnicodeCodePage,
   { the code page to use when sending paths/file names to OS file system API