私の勘が確かならば、下の方法でフォーカスを消せると思います。> リッチエディットにカレンダーを表示させているのですが、マウスでクリックした場合にフォーカスが移ってしまいカーソルが表示されてしまいます。
> これをラベルと同じように表示だけするようにしたいのですが、よい方法があれば教えてください（読み取り専用にする方法は見つけたのですがマウスでクリックするとカーソルが表示されてしまいます）。
コード: 全て選択
Function MainWndProc(hWnd As HWND, dwMsg As DWord, wParam As WPARAM, lParam As LPARAM) As DWord
' TODO: この位置にウィンドウメッセージを処理するためのコードを記述します。
Select Case dwMsg
Case WM_COMMAND
Select Case LOWORD(wParam)
Case RichEdit1
Select Case HIWORD(wParam)
Case EN_SETFOCUS
SendDlgItemMessage(hWnd,RichEdit1,WM_KILLFOCUS,0,0)
End Select
End Select
End Select
' イベントプロシージャの呼び出しを行います。
MainWndProc=EventCall_MainWnd(hWnd,dwMsg,wParam,lParam)
End Function
コード: 全て選択
Const MONTHCAL_CLASS = "SysMonthCal32"そうなんですか、知りませんでした。> あと、カレンダーを表示するだけでしたら、専用のカレンダーコントロールと
> いうのがコモンコントロールにありますのでそちらを使用するのも良いでしょう。