风在飞 发表于 2002-7-31 07:32:00

可以呀

可是怎么标呢？
轴测图上的圆是椭圆画出来的，所以标注时怎么才能标出他的半径以及直径呢？
还望告知

陈伯雄 发表于 2002-7-31 09:26:00

这是Inventor自己完成的轴侧图...

龙龙仔 发表于 2002-7-31 12:48:00

请是一个查询等角圆的程序

;;;-------------------------------------------------------------------------------------------------
;;;请是一个查询等角圆<轴侧圆>的程序
;;;BY 龙龙仔(LUCAS)
;;;注意:AUTOCAD是如何画等角圆
;;;指令: SETVAR 输入变量名称或 [列示(?)] <SNAPSTYL>: SNAPSTYL
;;;输入 SNAPSTYL 的新值<1>: 1
;;;指令: ELLIPSE
;;;指定椭圆的轴端点或 [弧(A)/中心点(C)/等角圆(I)]: I
;;;指定等角圆的中心点:
;;;指定等角圆的半径或 [直径(D)]:
;;;需要数值距离, 第二点, 或选项关键词.
;;;从3D转出的等角图要*1.224744871392倍
;;;-------------------------------------------------------------------------------------------------
(defun C:DXF2 (/ HOLDECHO HOLDBLIP QQ40 RATEE RATEEE AAA QQ1 RADDD RADD AAA1)
(setq HOLDECHO (getvar "cmdecho"))
(setq HOLDBLIP (getvar "blipmode"))
(setvar "cmdecho" 0)
(setvar "blipmode" 0)
(defun DXF22 ()
    (setq QQ40 (abs (- (cdr (assoc 40 AAA)) 0.57735)))
    (if        (< QQ40 2.7E-4)
      (progn
        (setq RATEE (abs (cadr (assoc 11 AAA))))
        (setq RATEEE (abs (caddr (assoc 11 AAA))))
        (cond
          ((< RATEEE 1E-13)
           (setq RADD (* (/ RATEE 1.224744871392) 2))
          )
          (t
           (setq RADD (* (/ RATEE 1.224744871392) 4))
          )
        )
        (if (= (length AAA1) 4)
          (progn
          (setq AAA210
                   (abs        (cadr (assoc 210 (entget (last (last AAA1)))))
                   )
          )
          (if        (= AAA210 0)
              (setq AAA210 1)
          )
          (setq RADD (/ (* RADD AAAF) AAA210))
          )
        )
        (setq RADDD (/ RADD 2.0))
        (prompt        (strcat        "\n半径= "
                        (rtos RADDD 2 8)
                        " , 直径= "
                        (rtos RADD 2 8)
                )
        )
      )
    )
)
(while (/= QQ1 "ELLIPSE")
    (while (null AAA1)
      (setq AAA1 (nentsel "\n请选择等角隋圆"))
    )
    (if        (> (length AAA1) 2)
      (setq AAAF (cdr (assoc 41 (entget (last (last AAA1))))))
      (setq AAAF (cdr (assoc 41 (entget (car AAA1)))))
    )
    (setq AAA (entget (car AAA1)))
    (setq QQ1 (cdr (assoc 0 AAA)))
    (if        (= QQ1 "ELLIPSE")
      (DXF22)
    )
    (setq AAA1 NIL)
)
(setvar "blipmode" HOLDBLIP)
(setvar "cmdecho" HOLDECHO)
(princ)
)

huangzq 发表于 2002-7-31 22:06:00

转成位图 用windows自带绘图工具手工标注

风在飞 发表于 2002-8-1 08:11:00

谢谢

谢谢你的指点呀！！！！！

风在飞 发表于 2002-8-1 08:12:00

喂？

你的这幅图的标注是不是用标注里的引线标的。
现在想想用，用引线也可以标注轴测图的。

东哥 发表于 2002-8-1 13:33:00

引线只有一个箭头

而用对齐标注可以实现。不过标注文字得自己改，或许标注样式也根据需要新建一个专用于轴测图上圆的标注样式。在AutoCAD中凑和着对付用嘞！如果常做这样的活，或许该想别的法子了。

loopking 发表于 2002-8-13 13:38:00

KAO!搞得这么麻烦.风在飞你直接跟陈老师学习Inventor好了.以后不会再问这种问题.

liumingcz 发表于 2002-8-31 00:55:00

奇怪，你是怎么画轴测图的？

画轴测图应该用等轴测捕捉或极轴捕捉，这枰的捕捉状态标出的就是实际尺寸乘伸缩系数。

belldraft 发表于 2003-11-26 19:30:00

如果是用ELLIPSE的I选项绘出来的椭圆,长轴除以1.2245,短轴X1.4144可得到圆的直径.
页: 1 [2]
查看完整版本: 急！！！！！！！！！！