i did the same thing a couple of weeks ago.. you can use all the tools offered by mappoint as long as you use "Close Curve" to create a valid polygone..
only thing you cant use is Highlight ..
i tested with the following . freeform, rectangle, scribble and line.
if you want code i can retreive some..
Code:
For Each mpShape In mpMap.Shapes
If mpShape.Type < geoLine Then
For Each mpData In mpMap.DataSets
Set mpRec = mpData.QueryShape(mpShape)
mpRec.MoveFirst
Do While mpRec.EOF = False
'Found .?
If mpRec.Pushpin.Name = "Pin #" & i Then
frm_main.txt_event = "Found" & i & vbCrLf & frm_main.txt_event
found = True
GoTo FOUND_IT 'save some time
End If
mpRec.MoveNext
Loop
Next mpData
End If
Next mpShape
FOUND_IT:
maybe its not the pretiest code.. but it does the job well for me so far