Hello, 
 
I am trying to create points on a currently open window by reading the X, Y locations (Easting and Northing) from an already open table.   I have a table with an Easting Column and  Northing Column.  All I want to do is plot the locations found in these two columns.

 
Please Help!
 
Here is my code:
 

sTable = Tableinfo(readcontrolvalue(tables_id), TAB_INFO_NAME)

 

Dim EAls, NAls, RowIdAls as Alias
Dim cuRowID As Integer
Dim NewObj as Object
Dim xEast as Float
Dim yNorth as Float

Fetch First From sTable

RowIdAls =sTable +".RowID"
EAls = sTable + ".NAD_83_Easting"
NAls = sTable + ".Northing"

Do While Not EOT(sTable)

curRowID = RowIdAls
xEast = EAls
yNorth = Nals

Create Point
Into Variable(xEast, yNorth)
Symbol sSymMarker
UPDATE sTable
SET Obj = CreatePoint(xEast, yNorth)
WHERE RowID = CurRowID

Fetch Next From sTable

Loop

 

 

Thanks,
Marko Cucnik
BCIT Practicum Student

_______________________________________________
MapInfo-L mailing list
[email protected]
http://www.directionsmag.com/mailman/listinfo/mapinfo-l

Reply via email to