connaitre le nombre de points d\'un polyline

[frmaniako]

[autocad & VB]

 

Salut à tous,

J'aimerais savoir si il existe une fonction permettant de connaitre le nombre de points constituant un polyline. (j'ai une variable de type 'AcadLWPolyline')

Merci pour votre aide, A+

 

[Pako]

Voici peut-être une solution ,

 

Public Sub NbPoints()

 

....Dim objPoly As AcadLWPolyline

....Dim basePnt As Variant

....Dim nbPoints As Integer

 

....ThisDrawing.Utility.GetEntity ObjPoly, basePnt, "Selectionner une polyligne :"

 

....For Each Coordinate In ObjPoly.Coordinates

........nbPoints = nbPoints + 1

....Next

 

....MsgBox "Cette polyligne à : " & nbPoints / 2 & " pts(x,y)"

 

End Sub

 

p.s. Tu n'es pas obligé de poser ta question 2X , tu ne sera pas plus vite répondu ! :casstet:

 

amicalement,

 

:yltype:

 

 

 

 

 

 

 

[Edité le 20/1/2005 par Pako]

[frmaniako]

Salut,

Merci pour ton aide, qui m'a bien aidé.

 

Sinon j'ai posté en double pke la dernière fois on m'avait pas répondu sur le forum 'vb' donc j'avais posté sur le forum 'autocad' où j'avais eu une réponse.... :P

 

Encore merci, A+

 

[Edité le 20/1/2005 par frmaniako]

[Pako]

Ok !

 

on m'avait pas répondu sur le forum

 

Une petite donation augmente les chances d'être répondu !

Ça encourage les intervenants(es) et surtout le webmaster !

(voir ci-bas)