DigiNG edición Scripting

Método digi.Proyecta

Proyecta un punto de coordenadas (XY) representado con un Objeto Point para obtener su Z si el punto está incluido en alguno de los archivos de Modelos Digitales del Terreno cargados con el Método NuevoArchivoMDT. El método modifica la coordenada Z del objeto Point y devuelve un valor True si el punto se pudo proyectar.

digi.Proyecta (punto)

Argumentos

punto

        Objeto Point con las coordenadas de entrada/salida.

Ejemplo

digi.NuevoArchivoMDT "c:\trabajo\prueba.mdt"

Dim pt

Set pt = CreateObject("Digi3D.Point")

pt.x = 100 * digi.Precision

pt.y = 200 * digi.Precision

If digi.Proyecta( pt ) Then

    MsgBox "El punto está dentro de un triángulo y tiene z=" & pt.z

Else

    MsgBox "El punto no está dentro de ningún triángulo.

End If

Set pt = Nothing

digi.DejarArchivoMDT "c:\trabajo\prueba.mdt"

Mirar también

Método NuevoArchivoMDT | Método DejarArchivoMDT | Propiedad PRECISION | Objeto Point

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

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