paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-09 01:29:08 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ added the win16api WM_SYSCOMMAND constants

Browse Source 
git-svn-id: trunk@31796 -
This commit is contained in:
nickysn 2015-09-23 16:28:35 +00:00
parent 9d9e7746ab
commit 2e2ac5c7ee
1 changed files with 26 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
rtl/win16/wintypes.inc
View File

@ -2136,3 +2136,29 @@ const
MB_TASKMODAL = $2000;
MB_NOFOCUS = $8000;
{ WM_SYSCOMMAND support }
WM_SYSCOMMAND = $0112;
{ System Menu Command Values }
SC_SIZE = $F000;
SC_MOVE = $F010;
SC_MINIMIZE = $F020;
SC_MAXIMIZE = $F030;
SC_NEXTWINDOW = $F040;
SC_PREVWINDOW = $F050;
SC_CLOSE = $F060;
SC_VSCROLL = $F070;
SC_HSCROLL = $F080;
SC_MOUSEMENU = $F090;
SC_KEYMENU = $F100;
SC_ARRANGE = $F110;
SC_RESTORE = $F120;
SC_TASKLIST = $F130;
SC_SCREENSAVE = $F140;
SC_HOTKEY = $F150;
{ Obsolete names }
SC_ICON = SC_MINIMIZE;
SC_ZOOM = SC_MAXIMIZE;