DigiNG edición Scripting



Método digi.FueVerticeUltimoPideEntidad

Nos indica si en la última selección con el Método PideEntidad, dicho método seleccionó la entidad tentativándose en un vértice de la entidad o en un segmento de ésta.


digi.FueVerticeUltimoPideEntidad


Devuelve


True

        La última selección se realizó tentativando en un vértice de la entidad.

False

        La última selección se realizó tentativando en un segmento de la entidad.


Ejemplo


Const vbLineas = 1

Dim entidad


digi.ImprimeMensaje "Seleccione una línea..."

Set entidad = digi.PideEntidad( True, vbLineas )

digi.ImprimeMensaje ""


If digi.FueVerticeUltimoPideEntidad Then

        MsgBox "La selección de la entidad se realizó en el vértice: " & digi.VerticeUltimoPideEntidad

Else

        MsgBox "La selección de la entidad se realizó en el segmento: " & digi.VerticeUltimoPideEntidad

End If


Set entidad = Nothing



Mirar también


Método ImprimeMensaje | Método PideEntidad | Método VerticeUltimoPideEntidad | Objeto Entidad


Fecha de última modificación: domingo, 9 de diciembre de 2001

© 2001-2002 Dreaming With Objects. Todos los derechos reservados.