[求助]请教高手，绘图区坐标如何转换成屏幕显示的位置？

userzhl

绘图区坐标如何转换成屏幕显示的位置？

userzhl

因为我想让对话框根据选取不同对象在相应位置进行显示。

caoyin

将图形单位坐标转换为像素坐标不就行了，

(defun Point_U2P (POINT);;自行测试一下，不知行不行
  (mapcar '(lambda (UN)
             (* UN (/ (cadr (getvar "screensize")) (getvar "viewsize")))
           )
          POINT
  )
)

userzhl

试了，不行。