找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 1732|回复: 26

[建议]:关于进行MDL和VBA编程开发和学习的讨论

[复制链接]
发表于 2003-6-30 10:07:48 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
为了推动MS的发展 展现MS的强大功能 学习Ms的人越来越多
所以要体现Ms的功能就要进行MdL和VBA的开发 希望大家来多进行交流交流 本人想开个MDL的学习 ,但是本人才疏学浅 希望大家来指正
学习程序最简单的方法是看例子 修改例子 将v8例子下的basic例子
basic.mc 内容删除 将以下内容粘贴上 编译就行了
//程序用于MS V8  
//用于搜索DGN中所有元素
#include    <mdl.h>
#include    <tcb.h>
#include    <mselems.h>
#include    <scanner.h>
#include    <userfnc.h>
#include    <cmdlist.h>
#include    <string.h>
#include    <math.h>

#include    <dlogman.fdf>
#include    <mssystem.fdf>
#include    <mslinkge.fdf>
#include    <msscan.fdf>
#include    <msoutput.fdf>
#include    <msparse.fdf>
#include    <mselemen.fdf>
#include    <msrsrc.fdf>
#include    <mslocate.fdf>
#include    <msstate.fdf>
#include    <msscancrit.fdf>
#include    <mscnv.fdf>
#include    <msscan.fdf>
#include    <msvec.fdf>
#include    <mselmdsc.fdf>
#include    <msmisc.fdf>
#include    <msmbstr.fdf>
#include    <msscell.fdf>

int ScanElem()
{
UInt32   elemAddr[50],eofPos,filePos;
int  scanWords,status,i,numAddr;
ExtScanlist  scanList;

MSElement el;
int num=0;

mdlScan_initScanlist(&scanList);
scanList.scantype    =ELEMTYPE|ONEELEM|NESTCELL;
scanList.extendedType  =FILEPOS;

mdlScan_noRangeCheck(&scanList);

//搜索所有类型的元素
scanList.typmask[0]=        TMSK0_LINE|TMSK0_LINE_STRING|TMSK0_SHAPE|
                        TMSK0_CURVE|TMSK0_TEXT_NODE|TMSK0_CELL_HEADER|
                           TMSK0_CMPLX_STRING|TMSK0_CONIC|TMSK0_CMPLX_SHAPE|
                           TMSK0_ELLIPSE|TMSK0_ARC;
scanList.typmask[1] = TMSK1_TEXT;
scanList.typmask[2] = TMSK2_SHARED_CELL;


/* 用于设置搜索范围  没有使用
scanList.xlowlim  = (Int64)rangeP->org.x;
scanList.ylowlim  = (Int64)rangeP->org.y;
scanList.xhighlim = (Int64)rangeP->end.x;
scanList.yhighlim = (Int64)rangeP->end.y;
scanList.zlowlim  = -1;
scanList.zhighlim = 1;
*/

eofPos = mdlElement_getFilePos(FILEPOS_EOF,NULL);

filePos  =0L;
   
mdlScan_initialize(0,&scanList);
do {     
        scanWords=sizeof(elemAddr)/sizeof(short);
        status   =mdlScan_file(elemAddr,&scanWords,sizeof(elemAddr),&filePos);
        numAddr  =scanWords/sizeof(short);
       
        for(i=0;i<numAddr;i++)
        {
            if(elemAddr>=eofPos) break;
            mdlElement_read(&el,0,elemAddr);
            printf("%d %d\n",num,el.ehdr.type);
            num++;
        }          
  } while(status==BUFF_FULL);
  
  return num;       
}

void main()
{
  ScanElem();
  mdlSystem_exit(0,1);
}
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
发表于 2003-6-30 10:20:00 | 显示全部楼层
MDL难不难啊?建议先开个VBA吧,这也是V8出现的新事物!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2003-6-30 10:36:38 | 显示全部楼层
因为VBA才出来不久 虽然比MDL要简单 但是相关的资料很少 用他做开发的人就更少了
所以我还没有学会
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-6-30 16:41:59 | 显示全部楼层
我也想学习
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-6-30 21:14:48 | 显示全部楼层
这个地方人气不是很旺啊!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-6-30 22:00:55 | 显示全部楼层
强烈支持!有好东东尽管拿出来,共同提高
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-7-1 09:40:31 | 显示全部楼层
我要报名学习!我想问一下斑竹,我学习了VB对VBA的学习有帮助吗?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-7-1 15:42:35 | 显示全部楼层
我原是学C++的,不太喜欢VB,但最近接触VBA,感觉不错,它与外界连接很好,如与数据库,office。可以充分利用它应用软件的功能。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-7-3 22:56:56 | 显示全部楼层
的确,我早先用mbe进行过一些开发工作,主要是针对目前的图纸修改工作做批量化处理
希望多交流
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-7-3 23:44:53 | 显示全部楼层
大家多多提出宝贵意见!!!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-7-4 16:50:28 | 显示全部楼层
希望大家一起努力将MS推向高潮!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-7-4 18:54:38 | 显示全部楼层
我喜欢VBA,VBA好用
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-7-6 21:39:54 | 显示全部楼层
那么多兄弟喜欢VBA,做点实际工作,给我们这些傻瓜上上课吗。VBA刚出来没多久,它比mdl容易上手,适合做简单的开发,弟兄们多努力!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-7-7 13:15:01 | 显示全部楼层
Bentley公司2003年8月初在上海有VAB培训
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-7-7 17:15:39 | 显示全部楼层
怎么报名啊?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-11-23 09:04 , Processed in 0.346943 second(s), 60 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表