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.