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

* Add scCommand (command key)

Browse Source
This commit is contained in:
Michaël Van Canneyt 2024-02-16 15:23:03 +01:00
parent 055740e2b3
commit f011e80cb2
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
rtl/objpas/classes/classesh.inc
View File

@ -53,6 +53,7 @@ const
{ values for TShortCut } { values for TShortCut }
scCommand = $1000;
scShift = $2000; scShift = $2000;
scCtrl = $4000; scCtrl = $4000;
scAlt = $8000; scAlt = $8000;
@ -2710,6 +2711,8 @@ type
property Platforms: TPlatformIds read FPlatforms write FPlatforms; property Platforms: TPlatformIds read FPlatforms write FPlatforms;
end; end;
const const
{ Platform identifiers } { Platform identifiers }
pidWin32 = $00000001; pidWin32 = $00000001;