Hello Hendrik,
I have created a small application doing this (Christine's arrow40 tool
doesn't come with source code):
include "mapbasic.def"
declare function UpdateWidth(byval Mobj as object, byval Mwidth as float) as
object
function UpdateWidth(byval Mobj as object, byval Mwidth as float) as object
dim NewPen as Pen
NewPen = ObjectInfo(Mobj, OBJ_INFO_PEN)
NewPen =
makepen(Mwidth*10+10,styleattr(NewPen,PEN_PATTERN),styleattr(NewPen,PEN_COLOR))
Alter Object Mobj Info OBJ_INFO_PEN, NewPen
UpdateWidth=Mobj
end function
' width is a field in the table with a value from 0.1 to 203.7 points
update mytable set obj=UpdateWidth(obj,width)
Thanks to Peter Horsbøll Møller for reminding me to include "byval" in the
function declaration.
Kind regards
Uffe Kousgaard
www.routeware.dk
----- Original Message -----
From: "Possberg, Hendrik" <[EMAIL PROTECTED]>
To: "Mapinfo-List (E-Mail)" <[email protected]>
Sent: Friday, August 05, 2005 10:21 AM
Subject: MI-L Thematic Map with Arrows
Dear List,
I am looking for a way to create a specific type of thematic Map with
Mapinfo.
I do not know the correct name of this type of maps but want to describe
what I mean.
I have some polygons representing cities and now I want to show the
migration movements between these cities.
This should be done with arrows. The thickness of these arrows should vary
according to the value of migration.
My Questions:
What is the name of this thematic map?
Is this possible with Mapinfo ? (7.8 is available)
Does anybody know a MBX which produces these maps?
If not, does anybody have an idea what should be done to write an
Application for MI. (Mapbasic Available)
Thanks in Advance.
Hendrik Poßberg
Manager Geodaten
microm Micromarketing - Systeme und Consult GmbH
Hellersbergstr. 14
41460 Neuss
Tel: 02131/109-751
Fax: 02131/109-777
email: [EMAIL PROTECTED]
www.microm-online.de <http://www.microm-online.de/>
---------------------------------------------------------------------
List hosting provided by Directions Magazine | www.directionsmag.com |
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Message number: 17398
