* fixed previous commit

git-svn-id: trunk@3422 -

rtl/win/wininc/defines.inc

@@ -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}
 

rtl/win/wininc/messages.inc

@@ -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;