掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
OnMouseUpを検出するには？ (ID：5284)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
将棋盤を再現しようと考えているのですが、 将棋盤や駒台は各々imageとして扱い、 その上に表示する駒はimagelistでまとめて扱うようにしています。 駒のドラッグドロップは下記のように考えています。 procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin imagelist1.SetDragImage($11,-image1.Left,-image1.Top); imagelist1.BeginDrag(Form1.Handle,x,y); end; procedure TForm1.Image1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin imagelist1.EndDrag; end; ですがImage1(将棋盤)上でドラッグした場合、 Image1(将棋盤)の外でドロップしても呼ばれるのはImage1MouseUpになりますよね。 もしImage2(駒台)上にドロップしていた場合Image2(駒台)上であることを知りたい、ということです。 説明の仕方が悪くて、申し訳ありません。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.