Send WM_HELP message when F1 is pressed.

diff --git a/controls/menu.c b/controls/menu.c
index a277ecb..786782a 100644
--- a/controls/menu.c
+++ b/controls/menu.c
@@ -2140,6 +2140,16 @@
     return item->hSubMenu;
 }
 
+
+
+/**********************************************************************
+ *         MENU_IsMenuActive
+ */
+BOOL MENU_IsMenuActive(void)
+{
+    return pTopPopupWnd && (pTopPopupWnd->dwStyle & WS_VISIBLE);
+}
+
 /***********************************************************************
  *           MENU_PtMenu
  *
@@ -2768,6 +2778,22 @@
 		    fEndMenu = TRUE;
 		    break;
 
+		case VK_F1:
+		    {
+			HELPINFO hi;
+			hi.cbSize = sizeof(HELPINFO);
+			hi.iContextType = HELPINFO_MENUITEM;
+			if (menu->FocusedItem == NO_SELECTED_ITEM) 
+			    hi.iCtrlId = 0;
+		        else	
+			    hi.iCtrlId = menu->items[menu->FocusedItem].wID; 
+			hi.hItemHandle = hmenu;
+			hi.dwContextId = menu->dwContextHelpID;
+			hi.MousePos = msg.pt;
+			SendMessageA(hwnd, WM_HELP, 0, (LPARAM)&hi);
+			break;
+		    }
+
 		default:
 		    break;
 		}