[编程申请]：尺寸编辑

lijiao

在ACAD中编辑尺寸总是一件烦心事，今天在INVENTOR中发现它可以通过拖动界点达到下图中的效果，真爽。请问各位大侠，能否通过编程在ACAD中也达到这样的效果？

XDSoft

最初由 lijiao 发布
[B]在ACAD中编辑尺寸总是一件烦心事，今天在INVENTOR中发现它可以通过拖动界点达到附件中的效果，真爽。请问各位大侠，能否通过编程在ACAD中也达到这样的效果？
[IMG]c:\documents and settings\lijiao1\my documents\... [/B]

你把截图的GIF或者JPG用附件传上来，大家看看。

lijiao

原始为下图，通过拖动界点就变为上图了。

XDSoft

最初由 lijiao 发布
[B]原始为下图，通过拖动界点就变为上图了。
c:\documents and settings\lijiao1\my documents\my pictures\pic1.bmp [/B]

不知道你是怎么传图片的，你截图成GIF，然后在附件栏目里面选上文件名，然后提交就可以了。

duye_chri

晓东：你好！
   由于工作的需要，能否帮编一个程序，将autocad绘出图形中各层的有关信息。
谢谢

XDSoft

最初由 duye_chri 发布
[B]晓东：你好！
   由于工作的需要，能否帮编一个程序，将autocad绘出图形中各层的有关信息。
谢谢 [/B]

详细说说，要什么信息？

也许现在有工具可以做了。

wwwchard

因为各专业不一样，图层中有很多信息没法过滤，而所含有的专业数据、名称即使针对一个专业过滤出来，也好像不是很有为此编写个程序专门对此的必要，普遍性不强！

梦断江南

cad的dim可以有拖动点啊，其实就是夹点，你点一下dim,自己试试，点击蓝色夹点变红后拖动。可以改变 文字位置，标注线位置，尺寸线位置（变换时候标注数值也跟着变换，如果你没有改动过dim标注文字的话）

lijiao

我用ACAD已经6年了，当然经常用夹点进行编辑，但无法将尺寸变为倾斜（指用夹点进行编辑）。

cy956

尺寸倾斜是根据尺寸字体定义的。

ll_j

最初由 lijiao 发布
我用ACAD已经6年了，当然经常用夹点进行编辑，但无法将尺寸变为倾斜（指用夹点进行编辑）。

翻出点老命令给你用用。

2. 
   
3. (defun C:DH()(command "dim1""horiz"))       ;水平标注
   
4. (defun C:Da()(command "dim1""ang"))         ;角度标注
   
5. (defun C:DV()(command "dim1""vertical"))    ;垂直标注
   
6. (defun C:DI()(command "dim1""ali"))            ;对齐标注
   
7. (defun C:DR()(command "dim1""RAD"))        ;半径标注
   
8. (defun C:DG()(command "dim1""dia"))          ;直径标注
   
9. (defun C:DU()(command "dim1""upd"))         ;标注更新
   
10. (defun C:DTR()(command "dim1""trotate"))   ;标注文字旋转
    
11. (defun c:Do()(command "dim1" "oblique"))    ;[color=red]标注线倾斜[/color]
    
12. (defun C:DT()(command "dim1""tedit"))        ;文字位置修改
    
13. (defun c:Dc()(command "dim1" "con"))         ;连续标注
    
14. (defun c:Nt()(command "dim1" "newtext"))   ;标注文字修改
    

<br /> (defun C:DH()(command "dim1""horiz"))       ;水平标注<br /> (defun C:Da()(command "dim1""ang"))         ;角度标注<br /> (defun C:DV()(command "dim1""vertical"))    ;垂直标注<br /> (defun C:DI()(command "dim1""ali"))            ;对齐标注<br /> (defun C:DR()(command "dim1""RAD"))        ;半径标注<br /> (defun C:DG()(command "dim1""dia"))          ;直径标注<br /> (defun C:DU()(command "dim1""upd"))         ;标注更新<br /> (defun C:DTR()(command "dim1""trotate"))   ;标注文字旋转<br /> (defun c:Do()(command "dim1" "oblique"))    ;[color=red]标注线倾斜[/color]<br /> (defun C:DT()(command "dim1""tedit"))        ;文字位置修改<br /> (defun c:Dc()(command "dim1" "con"))         ;连续标注<br /> (defun c:Nt()(command "dim1" "newtext"))   ;标注文字修改<br />

lijiao

ACAD中的oblique有问题，如附件中的图片，AB段与AC段肯定不等；
我设计了一个程序，我的问题已经解决，现让大家分享。

mmmm

不一定，我想他的意思是尺寸边界线倾斜
我很少用到，不过ACAD应该可以做到，如同画轴侧图时的尺寸标注线应该是倾斜的