如下列所示,摘錄教材上提取X坐標的一段,好好像不正確: _$(setq mycircle (vla-addcircle mspace (vlax-3d-point (getpoint "\n請選擇圓的中心點:")) 2.0)) _$ (setq mycenter (vla-get-center mycircle)) #<variant 8197 ...> _$ (setq x (-(car mycenter)1)) ; 錯誤: 損壞的引數類型: consp #<variant 8197 ...> 用vla-get-center獲取的圓心值是變體,可以用car函數嗎?(提示有錯)。那用什麼方法提取X坐標呢? |