掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ボタンの真下の座標がうまくとれない (ID:75577)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
"ブラウザ風のボタンを作りたい"の質問に関係あることなんですけど、 ユーザーコントロールの真下にある画像をbitbltで転送しようとしたんですけど、 Dim DC As Long, rc As RECT, rc2 As RECT GetWindowRect UserControl.hWnd, rc:GetWindowRect ContainerHwnd, rc2 DC = GetDC(ContainerHwnd) With UserControl 'いったん隠す ShowWindow .hWnd, vbHide:DoEvents BitBlt .hDC, 0, 0, ScaleWidth, ScaleHeight, DC, rc.Left - rc2.Left, rc.Top - rc2.Top, vbSrcCopy ShowWindow .hWnd, vbNormalNoFocus End With ReleaseDC ContainerHwnd, DC こういうふうにやると、背景はしっかり転送されるんですけど、少しずれてしまいます。 計算すればなんとかなると思いますけど、どういう計算をすればいいのか…。 おしえてください。おねがいします。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.