AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~

[已解決]文字字高取出問題

上一篇主題 下一篇主題 向下

[已解決]文字字高取出問題

發表 由 adslwang 于 2011-07-01, 05:25

請問各位前輩
我將下面物件要取出文字字高,要怎麼才能將oldr轉成一個值
比如選取字體字高是10,那oldr就可以10代入其它的式子

(setq en (car (entsel "\n ")))
(setq endata (entget en))
(setq oldr (assoc 40 endata))

疑問
avatar
adslwang
高級會員
高級會員

文章總數 : 372
年齡 : 38
來自 : 台南
職業 : 自由業
愛好 : 電腦、旅行
個性 : 樂觀
使用年資 : 1年
使用版本 : 2009
積分 : 17
經驗值 : 4539
威望值 : 355
回帖精華 : 1
注冊日期 : 2008-10-02
藍鵲88號
男 處女座 馬

回頂端 向下

回復: [已解決]文字字高取出問題

發表 由 tarpon 于 2011-07-01, 13:12

adslwang 寫到: 請問各位前輩
我將下面物件要取出文字字高,要怎麼才能將oldr轉成一個值
比如選取字體字高是10,那oldr就可以10代入其它的式子

(setq en (car (entsel "\n ")))
(setq endata (entget en))
(setq oldr (assoc 40 endata))

疑問

(setq oldr (cdr(assoc 40 endata)))
avatar
tarpon
中級會員
中級會員

文章總數 : 201
年齡 : 27
來自 : 台北
職業 : 設計
愛好 : 打球
個性 : 溫和
使用年資 : 5年
使用版本 : 2006
積分 : 6
經驗值 : 3529
威望值 : 238
注冊日期 : 2010-07-01
串連貼紙成功 男 巨蟹座 馬

回頂端 向下

回復: [已解決]文字字高取出問題

發表 由 adslwang 于 2011-07-01, 14:15

tarpon 寫到:
adslwang 寫到: 請問各位前輩
我將下面物件要取出文字字高,要怎麼才能將oldr轉成一個值
比如選取字體字高是10,那oldr就可以10代入其它的式子

(setq en (car (entsel "\n ")))
(setq endata (entget en))
(setq oldr (assoc 40 endata))

疑問

(setq oldr (cdr(assoc 40 endata)))

前輩謝謝... 感動
avatar
adslwang
高級會員
高級會員

文章總數 : 372
年齡 : 38
來自 : 台南
職業 : 自由業
愛好 : 電腦、旅行
個性 : 樂觀
使用年資 : 1年
使用版本 : 2009
積分 : 17
經驗值 : 4539
威望值 : 355
回帖精華 : 1
注冊日期 : 2008-10-02
藍鵲88號
男 處女座 馬

回頂端 向下

上一篇主題 下一篇主題 回頂端


 
這個論壇的權限:
無法 在這個版面回復文章