Hi list,
I've now (finally) gotten back to this project, and keeps getting an error
that's driving me crazy.
vmVoronoi returns error code 389, and the SDK returns this explanatory text
when queried: "Vertical Mapper Error #389", which off course doesn't help me
much.
Anyone got a better description of VM/SDK error codes ?
I've gone thru the (apparently necessary) motions of creating a 3D file, and
using the 3D file to generate a TRI file. Both functions return 0 (zero)
indicating success.
I've included the relevant code snippet from my application. I would
appriciate any help on this, since I believe that I've tried every possible
avenue I can think of. There has been some dispute over the 3rd parameter of
vmVoronoi, but the manual clearly states that it's "Full path to the MapInfo
.tab from which the TRI file was created". In any case, I _have_ tried using
pthnam3D instead, but that returns the same error.
Code begins <<
Dim pthnam_limit, pthnamPTS, pthnam3D, pthnamTRI, pthnamVOR as String
Dim helpi4 as Integer
Dim useStyles As REGION_STYLE 'vm/sdk
Dim s1, s2 as String
'pthnam_limit as a MapInfo table that contains the outer boundary of the
grid
'pthnamPTS is a MapInfo table that contains the measurement points
pthnam3D = TempFileName$("") + ".3d"
helpi4 = vmGetMappableTable3dPoints (pthnamPTS, pthnam3D, 2, FALSE, s1, s2,
ZUNIT_METERS, 0)
pthnamTRI = TempFileName$("") + ".tri"
helpi4 = vmGetTriangles (pthnam3D, pthnamTRI, 100000.0, 10.0, 1, 0) '100km,
10m, average
pthnamVOR = TempFileName$("") + ".tab"
useStyles.PenWidth = 1
useStyles.PenPattern = 2
useStyles.PenColor = 0
useStyles.BrushPattern = 2
useStyles.BrushForecolor = 0
useStyles.BrushBackcolor = 0
helpi4 = vmVoronoi(pthnamTRI, pthnamVOR, pthnamPTS, 1, 0.0, 0, 0, 8.0,
useStyles, pthnam_limit, 1, 0)
>> Code ends
Any ideas ?
Best regards / Med venlig hilsen
Lars V. Nielsen
--------------------------------------------------------
Hvenegaard & Meklenborg
Rugaardsvej 55, DK-5000 Odense C
Denmark
http://www.hvm.dk
---------------------------------------------------------------------
List hosting provided by Directions Magazine | www.directionsmag.com |
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Message number: 5822
