画像の特定部分のコピーを取りたくてstrechBlt()を使っているのですが、どうも
座標の位置がずれているようです。
Picture1のある部分のコピーを別のPictureに移したいです。
コードは
Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
　　クリップボード.AutoRedraw = True
　　クリップボード.Width = Abs(dX - X): クリップボード.Height = Abs(dY - Y)
　　Ret = StretchBlt(クリップボード.hdc, 0, 0, クリップボード.Width, クリップボード.Height, _
　　Picture1.hdc, mX, mY, クリップボード.Width, クリップボード.Height, SRCCOPY)
　　クリップボード.Refresh
　　クリップボード.AutoRedraw = False
End Sub
です。dX･dYはマウスダウン時の座標をグローバル変数で保管しておいた値です｡
座標が全然ずれている場合と何もコピーされていない2パターンの現象がおきて
います。
原因がわかる方がいたら、よろしくお願いします｡