Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Maps in VFP
Message
From
02/07/2007 10:18:48
 
 
To
01/07/2007 22:33:43
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Miscellaneous
Thread ID:
01237073
Message ID:
01237128
Views:
17
>Any way to display a map in VFP and call a method if user clicks in the given area (polygonal).
>Any third party utility to do the same
>-----------------------------------
>Rajesh Halyal

I have done this by scanning the map and converting it to a jpg.
From there I use the click method to put a shape on a map.

Here is the image click code:
Local Choice
Choice = Messagebox( "Do you want to place a crime location on the map? ",4," Map coordinates ")
Do Case
Case Choice = 7
	Return
Case Choice = 6

	NameOfShape = Sys(2015)
	Thisform.AddObject( NameOfShape, "shape")
	With Thisform.Controls[thisform.ControlCount] && the last member
		.Move(XX,YY,9,9)
		.Curvature = 99
		.BackColor = 16711680
		.BackStyle = 1
		.BorderWidth = 1
		.BorderColor = 65535
		.SpecialEffect = 0
		.ToolTipText = "Incident location"
		.Visible = .T.
	Endwith

Endcase
I ain't skeert of nuttin eh?
Yikes! What was that?
Previous
Reply
Map
View

Click here to load this message in the networking platform