paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-16 02:50:40 +01:00
Code Issues Packages Projects Releases Wiki Activity

* windows unit enhancements from mantis #34184

Browse Source 
git-svn-id: trunk@39675 -
This commit is contained in:
marco 2018-08-27 18:11:40 +00:00
parent d9cb5c4502
commit 0b9ee238b5
2 changed files with 26 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
rtl/win/wininc/defines.inc
View File

@ -646,13 +646,10 @@
ALTERNATE = 1;
WINDING = 2;
{ CreateProcess }
CREATE_DEFAULT_ERROR_MODE = 67108864;
CREATE_NEW_CONSOLE = 16;
CREATE_NEW_PROCESS_GROUP = 512;
CREATE_SEPARATE_WOW_VDM = 2048;
CREATE_SUSPENDED = 4;
STACK_SIZE_PARAM_IS_A_RESERVATION = $10000;
CREATE_UNICODE_ENVIRONMENT = 1024;
DEBUG_PROCESS = 1;
DEBUG_ONLY_THIS_PROCESS = 2;
DETACHED_PROCESS = 8;
@ -660,6 +657,31 @@
IDLE_PRIORITY_CLASS = 64;
NORMAL_PRIORITY_CLASS = 32;
REALTIME_PRIORITY_CLASS = 256;
CREATE_UNICODE_ENVIRONMENT = $00000400;
CREATE_SEPARATE_WOW_VDM = $00000800;
CREATE_SHARED_WOW_VDM = $00001000;
CREATE_FORCEDOS = $00002000;
BELOW_NORMAL_PRIORITY_CLASS = $00004000;
ABOVE_NORMAL_PRIORITY_CLASS = $00008000;
INHERIT_PARENT_AFFINITY = $00010000;
INHERIT_CALLER_PRIORITY = $00020000; // Deprecated
CREATE_PROTECTED_PROCESS = $00040000;
EXTENDED_STARTUPINFO_PRESENT = $00080000;
PROCESS_MODE_BACKGROUND_BEGIN = $00100000;
PROCESS_MODE_BACKGROUND_END = $00200000;
CREATE_BREAKAWAY_FROM_JOB = $01000000;
CREATE_PRESERVE_CODE_AUTHZ_LEVEL = $02000000;
CREATE_DEFAULT_ERROR_MODE = $04000000;
CREATE_NO_WINDOW = $08000000;
PROFILE_USER = $10000000;
PROFILE_KERNEL = $20000000;
PROFILE_SERVER = $40000000;
CREATE_IGNORE_SYSTEM_DEFAULT = $80000000;
{ CreateService }
SERVICE_ALL_ACCESS = $f01ff;
SERVICE_CHANGE_CONFIG = 2;
@ -2413,6 +2435,7 @@ Type
REG_RESOURCE_LIST = 8;
REG_RESOURCE_REQUIREMENTS_LIST = 10;
REG_SZ = 1;
REG_QWORD = 11;
{ RegisterHotKey }
MOD_ALT = 1;
MOD_CONTROL = 2;

1
rtl/win/wininc/redef.inc
View File

@ -104,7 +104,6 @@ const
SIF_TRACKPOS = $10;
CP_UTF7 = 65000;
CP_UTF8 = 65001;
CREATE_NO_WINDOW = $08000000;
WHEEL_DELTA = 120;
WHEEL_PAGESCROLL = MAXDWORD;