| 投稿日 | ： 2007/07/11(Wed) 19:44 |
| 投稿者 | ： なな |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： フリーハンドで描いたオブジェクトを選択したか？判定したい |
いつもお世話になります。
VB歴３年のPGです。
環境:VB6(SP5) WinXp
PictureBoxにフリーハンドで描いたオブジェクトがあります。
そのオブジェクトを選択したかどうか？という判定を
どのように行えば良いか分かりません。
フリーハンドで描く処理は、以下の通りです。
よろしくお願いします。
----------------------------------------------------------------
Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single,
Y As Single)
Flag = True
Picture1.PSet (X, Y)
End Sub
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single,
Y As Single)
If Flag = True Then
Picture1.Line -(X, Y)
End If
End Sub
Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single,
Y As Single)
Flag = False
End Sub