Hi
Is there anybody has mapbasic saple for contour creation from grid file?
Or who can tell me whats wrong in code below
Thanks for any help
sub kontur
dim s_conturtab,t_o as string
dim pstContours(3) as CONTOUR
dim i_errcode,GridIDs as integer
t_o = fileopendlg("","","Tab","grid dosyasını seçiniz")
s_conturtab="c:\kontur.tab"
pstContours(1).elev= 0.0 pstContours(1).penwidth=1
pstContours(2).elev= -80.0 pstContours(2).penwidth=1
pstContours(3).elev= -100.0 pstContours(3).penwidth=1
GridIDs=vmOpenGrid( t_o ,0)
print GridIDs
i_errCode= vmPlineContour (GridIDs, s_conturtab, 3 , pstContours(1), 0 )
end sub
_______________________________________________
MapInfo-L mailing list
[email protected]
http://www.directionsmag.com/mailman/listinfo/mapinfo-l
