Diseño de utilidad

Después de que el sistema de coordenadas actual sea el sistema de coordenadas del usuario, los datos ingresados ​​a través del programa siguen siendo los datos del sistema de coordenadas original. Aunque crea que es un punto en el sistema de coordenadas del usuario, el programa lo niega. Esto requiere convertir las coordenadas del sistema de coordenadas del usuario al sistema de coordenadas mundial. Función:

RETVAL=PBKECT. Coordenadas de traducción (origen, punto inicial, punto final, DISP[, normal])

Ejemplo:

Esta pintura. ACTIVEUCS=MYUCS

ATENUAR POINTWCS COMO VARIANTE

POINTWCS=ESTE DIBUJO. UTILITY.GETPOINT("Ingrese un punto")

DIM POINTUCS como variante

POINTUCS=THISDRAWING. UTILIDAD . traducir coordenadas _(punto wcs,ACWORLD,ACUCS,FALSE)

MSGBOX POINTWCS(0)

MSGBOX punto UCS(0)

Dim PUCS② Me gusta. doble

DIM PWCS como variante

PWCS = esta imagen.utilidad.coordenadas de traducción (PUCS,ACUCS,ACWORLD,FALSE)

ESTABLECER MYLINE en ACADLINE

SET MYLINE=ESTE DIBUJO .Espacio modelo.ADDLINE(PWCS,PWCS2)