有时候，cad中画图有的线不能捕捉，还有将cad导入su中发现有些线段不在同一个高度，怎么办？
我们需要在cad中将所有线的Z坐标都调整到0就能解决这个问题。
下面我来发个之前在网上收集的解决方法。
【方法一】命令法（中文为注释）：在命令行键入change
Command：CHANGE
选择对象
Select objects： all
键入p选择修改特性
Properties/<Change point>： p
键入e修改标高
Change what property (Color/Elev/LAyer/LType/ltScale/Thickness) e
输入新的Z坐标
New elevation <varies>： 0
选择修改特性，回车结束。
Change what property (Color/Elev/LAyer/LType/ltScale/Thickness)
Commnd：
【方法二】移动法：很简单，键入移动命令“move”，将所有实体移至点1,0,1E99，然后再重复“move”命令，将所有实体移至点0,0,-1E99即可。
该方法利用AutoLISP语言编程如下：
;;标高(Z坐标)归零实用程序
(defun C:Z=0 ()
(setvar "cmdecho" 0)
(princ "\n正在处理图形数据,请稍候...")
(command "_.UCS" "")
(command "_.move" "_all" "" ’(0 0 1e99) "" "_.move" "_p" "" ’(0 0 -1e99) "")
(princ "\nOK,已将所有图元的标高值即Z坐标归零.")
(setvar "cmdecho" 1)
(princ)
)end (defun C:Z=0 ()
|
/1 
