Have a look at this code which we use to draw regions within a free
graphics layer.
'This section allows the user to construct regions in the free
graphics layer
sub region_1
Dim y as integer
dim layer_name as string
dim opline as object
y = 1
do while y =mapperinfo(frontwindow(),MAPPER_INFO_LAYERS)
layer_name = layerinfo(frontwindow(),y,layer_info_name)
if layer_name = "freegraphic" then
set map
layer y
editable on
end if
y = y + 1
loop
opline = commandinfo(CMD_INFO_CUSTOM_OBJ)
insert into freegraphic (obj) values (opline)
Commit table freegraphic
end sub
If you have any questions just E-mail me
Date sent: Fri, 30 Jun 2000 12:57:10 +0530
From: Anish Kumar P [EMAIL PROTECTED]
To: MapInfo List [EMAIL PROTECTED]
Subject: MI :Create region using Custom Tool
Hi List
I would like to create a buttonpad with a toolbutton using which user
can create/draw region. Any help on this will be appreciated.
Thanks in advance
Kumar
--
To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put
"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
**
Traffic Director for London
This email and any files transmitted with it are private and
intended solely for the use of the individual or entity to whom they
are addressed.
This email does not constitute a commitment by TDfL.
**
Traffic Director for London
College House, Great Peter Street, London SW1P 3LN
Tel: 0207 222 4545 FAX: 0207 976 8640
**
--
To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put
"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
