This text is a mapbasic code that print the total number of nodes of all objects of YOURTABLE
'*********************************************************** include "mapbasic.def" Dim iSectionCount, iNodeCount, i , NUMTOTALNODES As Integer dim oobj as object fetch first from YourTable do while not eot (YourTable) oobj = YourTable.obj iSectionCount = ObjectInfo(oObj, OBJ_INFO_NPOLYGONS) For i = 1 To iSectionCount iNodeCount = ObjectInfo(oObj, OBJ_INFO_NPOLYGONS + i) NUMTOTALNODES = NUMTOTALNODES+iNodeCount next fetch next from YourTable loop print NUMTOTALNODES '********************************************************************** ----- Original Message ----- From: "Evan MacDougall" <[EMAIL PROTECTED]> To: "MapInfo-L (E-mail)" <[EMAIL PROTECTED]> Sent: Wednesday, January 07, 2004 6:08 PM Subject: MI-L Node Count Is there a quick and easy way of counting the nodes in a table in MI-pro 7.5? Maybe a quick mapbasic script? Thanks! -Evan MacDougall GIS Supervisor - DPSI [EMAIL PROTECTED] (800)736-3109/(310)342-3600 - ext. 3681 --------------------------------------------------------------------- List hosting provided by Directions Magazine | www.directionsmag.com | To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] Message number: 9807
