Changeset 73 for trunk/src/helpers/winh.c

Timestamp:

May 23, 2001, 6:59:40 PM (24 years ago)

Author:

umoeller

Message:

Misc changes.

File:

• trunk/src/helpers/winh.c (modified) (1 diff)

trunk/src/helpers/winh.c

@@ -448 +448 @@
     }
     return (hwndNewMenu);
+}
+
+/*
+ *@@ winhSetMenuCondCascade:
+ *      sets the "conditional cascade" style
+ *      on the specified submenu.
+ *
+ *      This style must always be enabled manually
+ *      because the resource compiler won't handle it.
+ *
+ *      Note: Pass in the _submenu_ window handle,
+ *      not the one of the parent. With lDefaultItem,
+ *      specify the item ID in the submenu which is
+ *      to be checked as the default item.
+ *
+ *@@added V0.9.12 (2001-05-22) [umoeller]
+ */
+
+BOOL winhSetMenuCondCascade(HWND hwndMenu,          // in: submenu handle
+                            LONG lDefaultItem)      // in: item ID of new default item
+{
+    // stolen from the Warp Toolkit WPS Guide
+    ULONG ulStyle = WinQueryWindowULong(hwndMenu, QWL_STYLE);
+    ulStyle |= MS_CONDITIONALCASCADE;
+    WinSetWindowULong(hwndMenu, QWL_STYLE, ulStyle);
+
+    // make the first item in the subfolder
+    // the default of cascading submenu */
+    return (BOOL)(WinSendMsg(hwndMenu,
+                             MM_SETDEFAULTITEMID,
+                             (MPARAM)lDefaultItem,
+                             0));
 }