iamhuangjinming 发表于 2016-10-18 09:40:28

求助：怎么把getvar "DWGNAME"的xxx.dwg中的.dwg删掉？


(defun c:facez()

(setq ss (getvar "DWGNAME"))

(alert ss))

出来的内容:建筑图.dwg。怎么只留下“建筑图”呢

vectra 发表于 2016-10-18 10:05:41

(vl-filename-base (getvar "DWGNAME"))

iamhuangjinming 发表于 2016-10-18 11:46:58

xufansw 发表于 2016-10-18 16:40:01

(defun c:facez()
(setq ss(vl-string-right-trim ".DWG" (getvar "dwgname")))
(setq ss(vl-string-right-trim ".dwg" (getvar "dwgname")))
(alert ss)
)

elitefish 发表于 2016-10-19 08:46:53

(vl-filename-base(getvar "DWGNAME"))
页: [1]
查看完整版本: 求助：怎么把getvar "DWGNAME"的xxx.dwg中的.dwg删掉？