mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-19 00:39:34 +02:00
* fixed previous commit
git-svn-id: trunk@3422 -
This commit is contained in:
parent
5afd8c5e76
commit
4ed1f3657f
@ -5402,6 +5402,13 @@ const
|
||||
|
||||
SYSRGN = 4;
|
||||
|
||||
UIS_SET = 1;
|
||||
UIS_CLEAR = 2;
|
||||
UIS_INITIALIZE = 3;
|
||||
|
||||
UISF_HIDEFOCUS = $1;
|
||||
UISF_HIDEACCEL = $2;
|
||||
UISF_ACTIVE = $4;
|
||||
|
||||
{$endif read_interface}
|
||||
|
||||
|
@ -1253,6 +1253,14 @@ Type
|
||||
TWMDestroy = TWMNoParams;
|
||||
TWMClose = TWMNoParams;
|
||||
TWMQueryUIState = TWMNoParams;
|
||||
|
||||
TWMUIState = record
|
||||
Msg : UINT;
|
||||
Action : Word;
|
||||
Flags : Word;
|
||||
Unused : HRESULT;
|
||||
end;
|
||||
|
||||
TWMChangeUIState = TWMUIState;
|
||||
TWMUpdateUIState = TWMUIState;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user