tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re: AxWindowsMediaPlayerでフォームを移動
投稿日: 2008/08/12(Tue) 15:44
投稿者花ちゃん
>     Private Sub AxWindowsMediaPlayer1_MouseMoveEvent(ByVal sender As Object, ByVal e As AxWMPLib._WMPOCXEvents_MouseMoveEvent) Handles AxWindowsMediaPlayer1.MouseMoveEvent
>         Me.Left += e.fX - FormMousePoint.X
>         Me.Top += e.fY - FormMousePoint.Y
>     End Sub

> としましたが、マウスを乗せるだけで移動してしまいます。

その時の Me.Left += e.fX - FormMousePoint.X 各値はどのようになっていますか?

仮に、FormMousePoint.X が 0 でも移動しますよね。
どこかで(MouseDown イベント)、移動開始のフラグでも設定して、そのフラグが
True の時だけ上記コードを有効にするとかしないと
フォームの場合のコードとよく見比べて見て下さい。

http://www.hanatyan.sakura.ne.jp/dotnet/mouse02.htm


又は、Win32 API 関数を使用するとか。
http://www.microsoft.com/japan/msdn/vbasic/migration/tips/Movement/

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。