选择cad图元,使之Z坐标更改为0,非常简单的lisp程序,大家自取