変更前の解像度が取得されてしまう。 (ID:102546)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 > 画面の解像度が変更された場合に、それに応じて > ウインドウの位置を変えるようにしたいと思いまして、 その場合、作業領域(タスクバー部を除いたエリア)も求める必要があるかも。 たとえばこんなイメージで。 Private Sub SysInfo1_DisplayChanged() If Screen.ActiveForm.Width > SysInfo1.WorkAreaWidth Then Screen.ActiveForm.Left = SysInfo1.WorkAreaLeft Screen.ActiveForm.Width = SysInfo1.WorkAreaWidth End If If Screen.ActiveForm.Height > SysInfo1.WorkAreaHeight Then Screen.ActiveForm.Top = SysInfo1.WorkAreaTop Screen.ActiveForm.Height = SysInfo1.WorkAreaHeight End If End Sub > どうすれば、変化した後の解像度を知ることができるでしょうか？ WM_DISPLAYCHANGE の場合、 wParam = 変更後の色数(bpp：ピクセルあたりのビット数) lParam = 新しい解像度(上位16bit=高さ、下位16bit=幅) のはずです。 http://msdn.microsoft.com/ja-jp/library/cc428309.aspx