I have another problem:
I wish to display my shortest route lines using the createline function:
The shortest route is stored in a table called OD_XY_COORDS
I want it to run through each row and create a line for each row,
the OD_XY_COORDS consists just of Start_X, Start_Y, End_X, End_Y
Want user to click on "display" which is stored in my "Routing" menu
here is the sub:
'********************************************************
'Displays the shortest route on the available map
'
'********************************************************
Sub DisplayData
'Firstly need to order existing tables and these tables
'status i.e. selectable,editable etc.
If IsTableClosed("OD_XY_COORDS") = TRUE then
Open Table OD_XY_COORDS
Else
End If
Set Map Layer "NODE"
Display Graphic
Editable OFF
Selectable OFF
Set Map Layer "LINKS"
Display Graphic
Editable OFF
Selectable OFF
Arrows ON
Set Map Layer "Drawing_2"
Display Graphic
Editable OFF
Selectable OFF
Add Map Layer "OD_XY_COORDS"
Set Map Layer "OD_XY_COORDS"
Display Graphic
Editable ON
Selectable ON
Arrows ON
Global Pen MakePen(4, 59, RED)
Set Map Order
"NODE",
"OD_XY_COORDS",
"LINKS",
"Drawing_2"
Do While Not EOT(OD_XY_COORDS)
Fetch First from OD_XY_COORDS
Create Line Into Window OD_XY_COORDS
(Start_X,Start_Y)(End_X,End_Y)
Pen MakePen(4, 59, RED)
Fetch Next from OD_XY_COORDS
loop
Can anybody help, deadline is end of month (Assignment)
Will
End Sub
----------------------------------------------------------------------
To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put
"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
