矩形法兰生成器 CAD vba

wzj_711

我是在autocad2007+PCCAD2007 里做的 提高大家的制图速度


使用说明

下载解压后

进入CAD

在命令行输入  vbaload   回车 选择解压的文件

然后 在命令行输入 ffl 回车 应该会出现程序界面了

如果没出来 就在VBA管理器里手动运行宏

有好的建议请提哈

终于放假完毕回公司了 应约上传矩形法兰了

qq025

好东西呀，终于盼到楼主发这个了，谢谢！！！
下载试用了，这个很好，用ffl就可以了，不过上次圆法兰的好像命令就没有作用，只有通过运行宏才可以实现，是不是少了语句造成的，下面是操作时产生的，加载圆法兰生成器时没有出来类似这行文字
命令: (defun C:ffl()(vl-vbarun "方形法兰生成"))
C:FFL

命令:
命令: _appload 已成功加载 圆形法兰生成器.dvb。
已加载 矩形法兰生成器.dvb。
命令: (defun C:ffl()(vl-vbarun "方形法兰生成"))
C:FFL
命令: ffl
_.-VBARUN
中心点："方形法兰生成"生成
中心点：
命令: 正在重生成模型。


最后还是要感谢你的作品，很好

[ 本帖最后由 qq025 于 2008-2-22 23:22 编辑 ]

qq025

哈哈，加载后再运行一次加载工程就可以用命令yfl来启动圆法兰生成器了，

命令: _vbaload
打开 VBA 工程:

文件名无效。
命令: (defun C:ffl()(vl-vbarun "方形法兰生成"))
C:FFL

命令: (defun C:yfl()(vl-vbarun "圆形法兰生成"))
C:YFL

命令: yfl
_.-VBARUN
中心点："圆形法兰生成"生成
中心点：
命令:



没有安装pccad的可以将我下面这个文件中的图形复制到所画的图形中就可以得到所需要的几个图层了和相关的标注格式了，我文件中的图形即作者附图中的方形法兰，我在cad2008中试用成功。


建议楼主在软件中使用cad本身带的标准标注格式，这样只要新建三个下列图层名称的新图层（3中心线层；7标注层；Defpoints）应该就可以在cad中直接使用了。也不知道我说的对不对，如不对请见谅！

[ 本帖最后由 qq025 于 2008-2-22 23:54 编辑 ]

wzj_711

需要新建的三个图层是

1轮廓实线层

3中心线层

7标注层

在autocad中新建上面的三个图层 就可以使用了

谢谢楼上朋友的建议

因为我们公司里都是用的PCCAD 所以就直接调用了PCCAD的图层 造成一些朋友无法使用 实在抱歉

lwjzql

不错的小软件，谢谢楼主。

jyb1860

怎么下不了啊?是什么问题?

wbgacy01

正在寻找，支持！谢谢！下来看看．

xgh5678

2006版本下，加载后老是提示找不到宏，请问如何解决呀？

wzj_711

上传一个PCCAD生成的DWG文件
里面包含了图层信息
配合我的小程序使用
就不会报错了

链条人生

楼主你太有才 了我真的谢谢你

xgh5678

问题找到了，加载后还需要再加载一次"方形法兰生成" 方能调出对话框。真的很好用，呵呵

mmjoyo

很好的东西啊！！楼主辛苦了啊！！！！谢谢分享

hnn19850109

开始不能用，我再试试

love063520

好象文件有问题，您调试好后再上传，浪费我银子的 ，

125735933

我积分、流量不够下不了。楼主能发到我的邮箱嘛？
   P125735933@163.com。谢谢!