Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Maps in VFP
Message
De
02/07/2007 10:18:48
 
 
À
01/07/2007 22:33:43
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Divers
Thread ID:
01237073
Message ID:
01237128
Vues:
16
>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?
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform