Quantcast
Channel: DotSpatial
Viewing all articles
Browse latest Browse all 3973

New Post: HOW TO add or lower the Z of a polyline Z line...

$
0
0
Hi Joska,

if what I wrote at the bottom of my last answer is correct I think it is possible. Here a sample code for doing the first part of the output:
        FileOpen(100, "coordinates.txt", OpenMode.Output)
        Dim x, y, z, m As Double
        Dim count As Integer = 0
        Dim ifeat As Integer = 0
        For Each f As Feature In flayer.FeatureSet.Features
            PrintLine(100, "feature " & ifeat)
            ifeat = ifeat + 1
            For Each coord As Coordinate In f.BasicGeometry.Coordinates
                x = coord.X
                y = coord.Y
                z = flayer.FeatureSet.Z(count)
                m = flayer.FeatureSet.M(count)
                PrintLine(100, x, y, z, m)
                count = count + 1
            Next
        Next
        FileClose(100)
with that you should get

feature 0
x1 y1 z1 m1
x2 y2 z2 m2
x3 y3 z3 m3
feature 1
xa ya za ma
xb yb zb mb
xc yc zc mc

then you can play with them to get the second part you need

Ciao
Oscar

Viewing all articles
Browse latest Browse all 3973

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>