Well, I figured it out. When you set up your thematic map (create grid) you set the actual CoordSys for the mapper window (prove this by putting in 'Set Map CoordSys Earth Projection 1, 62' after the 'Map From' statement then doing the Affine Transform).
Thus putting an Affine Transform in the CoordSys of the thematic fixes the size problem. 'Affine Units "m", 1, 0, 0, 0, 1.5, 0' stretches the map top to bottom just fine. New Question: What is wrong with the following projection that I get the error: Invalid distance units: 23 "DTN Mercator (2002, meters)", 3010, 62, 7, -96, 23, 33, 45, 0, 0, 7, 1, 0, 0, 0, 1.5, 0, 0, 0, 0, 0 Original code: Dim rect As Object Dim rectRight As Object Create Rect Into Variable rect ( <minx>,<miny> ) ( <maxx>,<maxy> ) Create Rect Into Variable rectRight ( <minx>,<miny> ) ( <maxx>,<maxy> ) Open Table "C:\mapinfo\ObsLocal.TAB" Interactive Open Table "D:\Program Files\MapInfo\Professional 6.5\DATA\Map_Data\Namerca\USA\Usa_Maps\US_CNTY.TAB" Interactive Open Table "D:\Program Files\MapInfo\Professional 6.5\DATA\Tut_Data\Tut_Usa\USA\STATES.TAB" Interactive Open Table "D:\Program Files\MapInfo\Professional 6.5\DATA\Tut_Data\Tut_Usa\WORLD\OCEAN.TAB" Interactive Select * From US_CNTY Where US_CNTY.obj Partly Within rect Into mapCnty Select * From STATES Where STATES.obj Partly Within rect Into mapState Select * From OCEAN Where OCEAN.obj Partly Within rect Into mapWater Select TEMPERATURE From ObsLocal Where ObsLocal.obj Partly Within rect Into mapTemp Map From mapState,mapCnty,mapWater create grid FROM mapTemp with TEMPERATURE into "C:\mapinfo\mapTemp_TEMPERATURE.mig" type "mig.ghl" CoordSys Earth Projection 1, 62 clipping table mapCnty inflect 12 at &H003f84:0 &H007aff:10 &H00adce:20 &H00d890:30 &H19ad00:40 &H73bd00:50 &He0e000:60 &He6ad00:70 &He68400:80 &He65a00:90 &Hff0000:100 &Hbf0000:999 # use 0 # cell min 100 interpolate with "IDW" version "100" using 2 "EXPONENT": "2" "SEARCH RADIUS": "50" Open Table "C:\mapinfo\mapTemp_TEMPERATURE.TAB" Interactive Set Map Layer 1 Display Graphic Add Map Layer mapTemp_TEMPERATURE Set Map Order 2,3,1,4 Set Map Layer 1 Display Global Global Pen (2,2,0) Global Brush (1,16777215,16777215) Set Map Layer 2 Display Global Global Pen (1,2,&H777777) Global Brush (1,16777215,16777215) Set Map Clipping Object rectRight Set Map Center (<mapx>,<mapy>) Set Window FrontWindow() Width 6.67 Units "in" Height 4.79 Units "in" '640x460 -- Michael Martinson [EMAIL PROTECTED] _______________________________________________________________________ List hosting provided by Directions Magazine | www.directionsmag.com | To unsubscribe, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MapInfo-L" in the message body.
