DigiNG edición Scripting

Método digi.PrimeraEntidadSolapaCon

Devuelve un Objeto Entidad constante correspondiente a la primera entidad registrada en un archivo DigiNG y cuyo rango de coordenadas máximas y mínimas solapen con un Objeto MaxMin pasado por parámetros.

¿Qué significa que el objeto devuelto es de sólo lectura? Significa que no podemos llamar a ningún método del Objeto Entidad que modifique cualquier propiedad de éste. No podemos cambiar su código, no podemos añadirle un punto, ni cambiar su tipo...

Para realizar cualquiera de estas tareas tendremos que realizar los siguientes pasos:

• Indicarle a DigiNG que nos Clone la entidad, devolviéndonos un objeto nuevo que ya no será de sólo lectura y al que podremos modificar a nuestro antojo. Método ClonaEntidad.
• Ocultar la entidad original Método OcultaEntidad.
• Borrar del archivo DigiNG la entidad original Método BorraEntidad.
• Almacenar en el archivo DigiNG la nueva entidad clonada Método AnadeEntidad.

digi.PrimeraEntidadSolapaCon (MaxMin, bSoloDelArchivoActivo)

Argumentos

MaxMin

        Objeto MaxMin con el rango de coordenadas con el que se comparará para seleccionar una entidad.

bSoloDelArchivoActivo

        Valor booleano (True ó False) que indica si queremos enumerar elementos sólo del archivo activo ó de todos los archivos de referencia.

Ejemplo

Dim punto

digi.ImprimeMensaje "Digitalize un punto. Se oscurecerán todas las entidades que solapen con dicho punto en una ventana de 100x100"

Set punto = digi.PidePunto

digi.ImprimeMensaje ""

Dim maxmin

Set maxmin = CreateObject("Digi3D.MaxMin")

maxmin.xmin = punto.x - 50 * digi.Precision

maxmin.ymin = punto.y - 50 * digi.Precision

maxmin.xmax = punto.x + 50 * digi.Precision

maxmin.ymax = punto.y + 50 * digi.Precision

Dim entidad

Set entidad = digi.PrimeraEntidadSolapaCon(maxmin, True)

While Not entidad Is Nothing

    digi.OcultaEntidad entidad

    Set entidad = digi.SiguienteEntidadSolapaCon(maxmin)

Wend

Set punto = Nothing

Set maxmin = Nothing

Mirar también

Método ImprimeMensaje | Método PidePunto | Método OcultaEntidad | Método SiguienteEntidadSolapaCon | Objeto Point | Objeto MaxMin | Objeto Entidad

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

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