Bladeren bron

+ added the application termination win16api functions and constants

git-svn-id: trunk@31716 -
nickysn 10 jaren geleden
bovenliggende
commit
dde243e4e5
2 gewijzigde bestanden met toevoegingen van 12 en 0 verwijderingen
  1. 4 0
      rtl/win16/winprocsh.inc
  2. 8 0
      rtl/win16/wintypes.inc

+ 4 - 0
rtl/win16/winprocsh.inc

@@ -785,3 +785,7 @@ function CallMsgFilter(lpmsg: LPMSG; nCode: SmallInt): BOOL; external 'USER';
 {$ifdef VAR_PARAMS_ARE_FAR}
 function CallMsgFilter(var msg: MSG; nCode: SmallInt): BOOL; external 'USER';
 {$endif}
+
+{ Application termination }
+
+procedure PostQuitMessage(nExitCode: SmallInt); external 'USER';

+ 8 - 0
rtl/win16/wintypes.inc

@@ -1351,3 +1351,11 @@ const
 { Coalescing messages }
   WM_COALESCE_FIRST = $0390;
   WM_COALESCE_LAST  = $039F;
+
+{ Application termination }
+  WM_QUERYENDSESSION = $0011;
+  WM_ENDSESSION      = $0016;
+
+  WM_QUIT            = $0012;
+
+  WM_SYSTEMERROR     = $0017;