[求助]：带圈的字符怎么输入

flayskay

请教各位高手，带圈的字符怎么输入，如带圈的A、带圈的B……，带圈的12、带圈的13……

ningwenguo993

呵呵，容易，写好字然后C就得咯。还有一个就是从WORD里COPY过来也得。

toulyr

定义属性块 就行了

水炮眼大侠

用LISP吧!写上一句很简单的

flayskay

4楼楼主怎么写啊,我不会呀

wxtian1

;加载后键入CT，按提示输入开始数字，数字个数，文本高度，圆的半径比例，点击屏幕上的点即可半自动;书写带圆圈的阿拉伯数字!
;---------------------按顺序书写带圆圈的阿拉伯数字-------------------------
(princ "\n 按顺序书写带圆圈的阿拉伯数字!")
(princ "\n To apply the program,Input \"ct\" .\n")
(princ)
(defun c:ct ()
(setq stanum (getint "\n Input the begin integer<1>: "))
(if (= stanum nil) (setq stanum 1) )
(setq num1 (getint "\Input the times<10>: "))
(if (= num1 nil) (setq num1 10) )
(setq texthigh (getreal "\Input the high of the text<2.5>: "))
(if (= texthigh nil) (setq texthigh 2.5) )
(setq r1 (getreal "\nInput the radius <0.85>: "))
(if (= r1 nil) (setq r1 0.85) )
(command "style" "standard" "romans.shx,ehzdx.shx" "0" "0.7" "0" "n" "n" "n")
(repeat num1
(setq pt (getpoint "\nSpecify the point: "))
(command "text" "j" "m" pt texthigh "0" stanum)
(command "circle" pt (* texthigh r1))
(setq stanum (1+ stanum))
)
(princ "\n Welcome to use the program again!")
(princ "\n Copyright by HongQuan.\n")
(princ "\n TianJin Urban Construction Design Courtyard!\n")
(princ)
)

cad_023

6楼的朋友，你说的专业了啊，能不能说的通俗些呢，偶也想明白如何输入带圈的字，谢谢了!

qjcpj

使用ET中的tcircle命令。

wjkzhjt

最初由 wxtian1 发布
[B];加载后键入CT，按提示输入开始数字，数字个数，文本高度，圆的半径比例，点击屏幕上的点即可半自动;书写带圆圈的阿拉伯数字!
;---------------------按顺序书写带圆圈的阿拉伯数字-------------------------
(pr... [/B]

*-*1 *-*1 *-*1 *-*1
6l楼，可以加上注解吗？
我是菜鸟。

加加虎

还不知道ET工具中有Tcircle这个命令，又学了一招，感谢8楼。

Joseflin

TCIRCLE

ganok

用输入法的带圈的字符也可以，比如紫光中：③④⑤⑦⑧⑨⑩②不错吧。

叶开是傻瓜

还是定义成块比较方便，每次插入的时候都可以改数字

流洋

我一直都是在WORD做好复制到CAD里面，这样很方便……

风一样男孩

还是定义成块比较方便，每次插入的时候都可以改