DigiNG edición Scripting

Método Distancia2D

Devuelve la distancia (en el plano) desde el objeto hasta otro Objeto Point.

objeto.Distancia2D (punto)

Argumentos

punto

        Objeto Point con el que medir la distancia.

Ejemplo

Dim pt1

Dim pt2

Dim distancia

Set pt1 = CreateObject("Digi3D.Point")

Set pt2 = CreateObject("Digi3D.Point")

pt1.x = 100

pt1.y = 100

pt2.x = 12

pt2.y = 26

distancia = pt1.Distancia2D(pt2)

Mirar también

Objeto Point

Fecha de última modificación: lunes, 17 de junio de 2002

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