MFC ダイアログ上のリストボックスの項目の選択を、マウスホイールで変えたい。

Question

実現したいこと

ダイアログ上でマウスホイールしたら、モーダルダイアログに配置したリストボックスの選択を変更したいです。

発生している問題・分からないこと

ダイアログのPreTranslateMessageでリストボックスの選択を変更しようと考えましたが、ダイアログのPreTranslateMessageだけではなく、CWinApp継承クラスのPreTranslateMessageでWM_MOUSEWHEELを処理してダイアログにSendMessageしているのが関係しているのか、ダイアログのPreTranslateMessageにWM_MOUSEWHEELが入ってきません。
また、OnMouseWheelでは、リストボックス上でホイール操作したものが入ってこないため、実現できません。
PreTranslateMessageでも、OnMouseWheelでもいいので、マウスホイールでリストボックスの選択を変える方法があれば教えてください。

該当のソースコード

// PreTranslateMessageでやろうとしたときのソースコード
// CWinApp継承クラス
BOOL MyApp::PreTranslateMessage(MSG* pMsg)
{
	// 色んな処理
	if (pMsg->message == WM_MOUSEWHEEL) {
		CWnd* pTarget = CWnd::WindowFromPoint(CPoint(pMsg->lParam));
		pTarget->SendMessage(WM_MOUSEWHEEL, pMsg->wParam, pMsg->lParam);
		return TRUE;
	}
	return CWinApp::PreTranslateMessage(pMsg);
}

// CDialogEx継承クラス
BOOL MyDialog::PreTranslateMessage(MSG* pMsg)
{
	switch (pMsg->message) {
	case WM_MOUSEWHEEL:
		// リストボックスの選択を変える処理
		return TRUE;
	default:
		break;
	}

	return CDialogEx::PreTranslateMessage(pMsg);
}

試したこと・調べたこと

• teratailやGoogle等で検索した
• ソースコードを自分なりに変更した
• 知人に聞いた
• その他

上記の詳細・結果

インターネットで検索しても有力な情報は得られませんでした・・・。
構造が似た簡易的なアプリケーションで試したら、CWinApp継承クラスのPreTranslateMessageでWM_MOUSEWHEELを処理しなかったら、ダイアログのPreTranslateMessageに入ってきました。ただ、システムが巨大で影響範囲が広いCWinApp継承クラスは変更しない方向で考えたいです。

補足

特になし

Answer 1

OnMouseWheelでは、リストボックス上でホイール操作したものが入ってこない

CListBox をサブクラス化してメッセージを処理すれば良いのではないかと思うのですが，
リストボックスでない場所でもホイール操作でリストボックスの選択を変えたいという話だと，それだけでは不足なので，プラスアルファが必要そうです．

既にAPPクラスがこのメッセージを PreTranslateMessage で捕獲してしまい SendMessage で投げているので，ダイアログ側ではこのメッセージは PreTranslateMessage に来ないハズです．
とすると，ダイアログでは直接的に WM_MOUSEWHEEL をハンドルすれば良いように思うのですが…

---

…っていうのをちょっと（ダイアログベースプロジェクトを作って）やってみたところ，
リストボックス上でマウスホイールを動かすと，リストボックスとダイアログの両方の処理が走るという謎の挙動になってしまいました．ワケワカンネー．
→ そしたら今度は何かしら多重処理を抑制するための工夫が必要になるのかもしれません……

あと，ダイアログ上の他のコントロール上でホイール操作した場合はどうするのか？　とか考えると，そこはうまい方法は思いつかない感じです．

Comments

[fana]

と，まぁ，完全に対応できる話ではないのですが，何かの参考になるかもしれないので書いてみました．

> CWinApp継承クラスのPreTranslateMessageでWM_MOUSEWHEELを処理しなかったら、ダイアログのPreTranslateMessageに入ってきました。ただ、システムが巨大で影響範囲が広いCWinApp継承クラスは変更しない方向で考えたいです。

とのことですが，APPクラス側で「対象（pTarget）がこのダイアログであるときだけは処理しないぜ！」みたいな変更を施すこともNGなのでしょうか．
影響はこのダイアログだけになる(?)でしょうし，最も手っ取り早い気がしますが…

[fana]

最初，

> 既にAPPクラスがこのメッセージを PreTranslateMessage で捕獲してしまい SendMessage で投げている

のところを PostMessage に変えればイインジャネーノ？　とか思ったのですが，単純にそれやると，ポストしたメッセージをまたここが最初に捕獲するわけなので無限ループ状態ですね^^
別のユーザ定義メッセージ（このAPPクラスで処理しないやつ）をポストするとかすれば回避できる気がしますが，いずれにせよAPPクラス側を変更できないという話なのでダメですよね．

[Kosho9513]

ご回答ありがとうございます。
>既にAPPクラスがこのメッセージを PreTranslateMessage で捕獲してしまい SendMessage で投げているので，ダイアログ側ではこのメッセージは PreTranslateMessage に来ないハズです．
これは知らなかった情報なのでありがたいです。ちなみに、このことに関する記述があるドキュメント等ありますでしょうか？

サブクラス化が頭から抜け落ちていて試していませんでした。
一度サブクラス化を試してみます。

[Kosho9513]

サブクラス化で期待する動作にすることができました！
別の問題も出てきましたが、それは別の質問にさせていただきます。
ありがとうございました。

[fana]

> このことに関する記述があるドキュメント等ありますでしょうか？

https://learn.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-sendmessage
の
Remarks のところに以下の一文があります．

> If the specified window was created by the calling thread, the window procedure is called immediately as a subroutine.

要は，SendMessageは（ここで言われている条件を満たす場合には）ウィンドウプロシージャをダイレクトに呼び出す，という話なので，そこのところに他の処理（今回は PreTranslateMessage）が入り込む余地がない，という話になるかと思います．

Answer 2

MFCを使っていたのは大昔すぎてうろ覚えなのですが、PreTranslateMessageはメッセージを事前に処理し、本来のイベントハンドラに渡さないために使用してたはずです。戻り値でFALSEを返せば本来のイベントハンドラにそのイベントが渡ります(既定の動作(＝基底クラス呼び出し)がFALSEでオーバーライドして止めたいときにTRUEにする)。

---

とりあえずコードがないと分からないのかもしれないということで、fanaさんが言っている

CListBox をサブクラス化してメッセージを処理

を作るべく、ダイアログベースのMFCアプリケーションを作成したところからのリソースを除く差分だけ載せます。

diff --git a/CHogeListBox.cpp b/CHogeListBox.cpp
new file mode 100644
index 0000000..4260d57
--- /dev/null
+++ b/CHogeListBox.cpp
@@ -0,0 +1,18 @@
+#include "pch.h"
+#include "CHogeListBox.h"
+
+BEGIN_MESSAGE_MAP(CHogeListBox, CListBox)
+	ON_WM_MOUSEWHEEL()
+END_MESSAGE_MAP()
+
+BOOL CHogeListBox::OnMouseWheel(UINT nFlags, short zDelta, CPoint pt) {
+	int selected = this->GetCurSel();
+	if (selected != LB_ERR) {
+		int count = this->GetCount();
+		selected = selected - ((zDelta >= 0) * 2 - 1);
+		selected = selected < 0 ? 0 : selected;
+		selected = selected >= count ? count - 1 : selected;
+		this->SetCurSel(selected);
+	}
+	return TRUE;
+}
\ No newline at end of file
diff --git a/CHogeListBox.h b/CHogeListBox.h
new file mode 100644
index 0000000..74c5d63
--- /dev/null
+++ b/CHogeListBox.h
@@ -0,0 +1,10 @@
+#pragma once
+#include <afxwin.h>
+class CHogeListBox :
+    public CListBox
+{
+protected:
+	afx_msg BOOL OnMouseWheel(UINT nFlags, short zDelta, CPoint pt);
+	DECLARE_MESSAGE_MAP()
+};
+
diff --git a/MFCApplication1Dlg.cpp b/MFCApplication1Dlg.cpp
index 215c288..7c3bf84 100644
--- a/MFCApplication1Dlg.cpp
+++ b/MFCApplication1Dlg.cpp
@@ -59,6 +59,7 @@ CMFCApplication1Dlg::CMFCApplication1Dlg(CWnd* pParent /*=nullptr*/)
 void CMFCApplication1Dlg::DoDataExchange(CDataExchange* pDX)
 {
 	CDialogEx::DoDataExchange(pDX);
+	DDX_Control(pDX, IDC_LIST1, m_lbList1);
 }
 
 BEGIN_MESSAGE_MAP(CMFCApplication1Dlg, CDialogEx)
@@ -100,6 +101,11 @@ BOOL CMFCApplication1Dlg::OnInitDialog()
 	SetIcon(m_hIcon, FALSE);		// 小さいアイコンの設定
 
 	// TODO: 初期化をここに追加します。
+	CString str;
+	for (int i = 0; i < 100; ++i) {
+		str.Format(_T("項目%03d"), i + 1);
+		m_lbList1.AddString(str);
+	}
 
 	return TRUE;  // フォーカスをコントロールに設定した場合を除き、TRUE を返します。
 }
@@ -152,4 +158,3 @@ HCURSOR CMFCApplication1Dlg::OnQueryDragIcon()
 {
 	return static_cast<HCURSOR>(m_hIcon);
 }
-
diff --git a/MFCApplication1Dlg.h b/MFCApplication1Dlg.h
index f94a9a5..4af5d41 100644
--- a/MFCApplication1Dlg.h
+++ b/MFCApplication1Dlg.h
@@ -3,6 +3,7 @@
 //
 
 #pragma once
+#include "CHogeListBox.h"
 
 
 // CMFCApplication1Dlg ダイアログ
@@ -31,4 +32,6 @@ protected:
 	afx_msg void OnPaint();
 	afx_msg HCURSOR OnQueryDragIcon();
 	DECLARE_MESSAGE_MAP()
+public:
+	CHogeListBox m_lbList1;
 };

ホイールを上下させてるときの動作

Comments

[Kosho9513]

ご回答ありがとうございます。
コードまでつけていただきありがとうございます。
サブクラス化で試してみます。

[Kosho9513]

いただいたコードを参考にして、期待する動作にすることができました。
別の問題も出てきましたが、それは別の質問にさせていただきます。
ありがとうございました。

Answer 3

OS側の設定になりますが、Windows10以降を利用しているとして
Windowsボタン(左下)をクリック、設定(歯車マーク)をクリック
Windowsの設定画面が出る。その中のデバイスをクリック、左メニューからマウスを選択。
変わった右画面の中で、ポイントしたときに非アクティブウィンドウをスクロールするがオフだった場合、オンにしてみてください。
過去にホイールスクロールで変わるのが嫌で、そこをオフにしたらできなくなったことがあるので。

Comments

[ardin]

ちなみにOS側の設定なので、Windowsの操作全てに効いてきます。

[Kosho9513]

ご回答ありがとうございます。
Windows11を使用しており、設定を確認しましたが「ホバーしたときに非アクティブウィンドウをスクロールする」はONになっていました。

[ardin]

そうですか。残念。
それでは別回答として、結局ホイール対象はダイアログではなくリストボックスなので、リストボックス側のホイールイベントを取らないとダメです。
オーナードローで自分で作りましょう。

[Kosho9513]

ありがとうございます。
サブクラス化を試していなかったので、やってみます。

[Kosho9513]

サブクラス化で期待する動作にすることができました。
ありがとうございました。