3

ボーダレス ウィンドウにシステム メニュー (復元、移動、サイズ...) を実装しています。サイズまたは移動が選択されたときに、マウス カーソルがウィンドウの中央に移動するようにします。

理想的には VB ですが、C# でも問題ありません。

4

2 に答える 2

2

SetCursorPos次のような関数を使用できます。

Declare Function SetCursorPos& Lib "user32" (ByVal p As Point)

'...

dim p as point
p.x = 100
p.y = 200
SetCursorPos p
于 2010-02-15T21:55:17.543 に答える
1

いくつかの微調整とそれはうまくいくようです:

Private Declare Function SetCursorPos Lib "user32" (ByVal x As Int32, ByVal Y As Int32) As Int32

...

With Win

  Dim left As Int32 = CInt(.Left + .Width - CURSOR_OFFSET_MEDIUM)
  Dim top As Int32 = CInt(.Top + .Height / 2)

  SetCursorPos(left, top)

End With
于 2010-02-16T22:44:14.760 に答える