The task before me is to create hundreds of zipcode-level views. I have isolated the zips in a separate table and wrote code that centers the window on each one to take a snapshot (export as jpg).
My problem is the darn labels!
For instance, the state label "NH" is visible for zipcode 00181, but when the code focuses on another zipcode a few miles away it isn't any longer.
Is there a setting or bit of code that forces labels to be shown no matter where the view is?
Here's my code:
Declare Sub Main Include "MapBasic.def" Sub Main dim strName as string dim objPoint As Object dim intX As Integer, intY as Integer Fetch First From advanceUncodedZips Do While Not EOT(advanceUncodedZips) strName = advanceUncodedZips.col1 objPoint = ObjectGeography(advanceUncodedZips.obj, OBJ_GEO_CENTROID) intX = ObjectGeography(objPoint, OBJ_GEO_POINTX) intY = ObjectGeography(objPoint, OBJ_GEO_POINTY) Set Map Center (intX, intY) Zoom (150) Save Window FrontWindow() As "C:\USER\views\view_" & strName & ".JPG" Type "JPEG" Width 8.29167 Units "in" Height 5.625 Units "in" Resolution 96 Fetch Next From advanceUncodedZips Loop exit sub ERRCATCH: End Sub


Sign In
Create Account
United States
Back to top
No Country Selected
United Kingdom








