Menus can be scrolled also using the mouse wheel

git-svn-id: file:///srv/svn/repos/haiku/haiku/trunk@27844 a95241bf-73f2-0310-859d-f6bbb57e9c96
2008-10-03 06:03:27 +00:00
parent bf732017df
commit 4e0c2a797d
3 changed files with 62 additions and 14 deletions
@@ -813,7 +813,30 @@ BMenu::Superitem() const
 void
 BMenu::MessageReceived(BMessage *msg)
 {
-	BView::MessageReceived(msg);
+	switch (msg->what) {
+		case B_MOUSE_WHEEL_CHANGED:
+		{
+			//float deltaX = 0
+			float deltaY = 0;
+			//msg->FindFloat("be:wheel_delta_x", &deltaX);
+			msg->FindFloat("be:wheel_delta_y", &deltaY);
+			if (deltaY == 0)
+				return;
+			
+			BMenuWindow *window = dynamic_cast<BMenuWindow *>(Window());
+			if (window == NULL)
+				return;
+				
+			window->TryScrollBy(deltaY);	
+			
+			break;
+		}
+		default:
+			BView::MessageReceived(msg);
+			break;
+	}
+	
+	
 }