开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 图形图像 > CAD > 查看源码
aaa1.cpp
资源名称：jianmu.rar　[点击查看]
上传用户：szhjsaaa
上传日期：2014-09-18
资源大小：2546k
文件大小：21k
源码类别：

CAD

开发平台：

Visual C++

aaa1.cpp：源码内容
  1. // aaa1.cpp : Initialization functions
  2. #include "StdAfx.h"
  3. #include "StdArx.h"
  4. #include "resource.h"
  5. #include <afxdllx.h>
  6. #include "math.h"
  7. //#include <aced.h>
  8. //#include <rxregsvc.h>
  12. HINSTANCE _hdllInstance =NULL ;
  14. // This command registers an ARX command.
  15. void AddCommand(const char* cmdGroup, const char* cmdInt, const char* cmdLoc,
  16. const int cmdFlags, const AcRxFunctionPtr cmdProc, const int idLocal = -1);
  19. // NOTE: DO NOT edit the following lines.
  20. //{{AFX_ARX_MSG
  21. void InitApplication();
  22. void UnloadApplication();
  23. //}}AFX_ARX_MSG
  25. // NOTE: DO NOT edit the following lines.
  26. //{{AFX_ARX_ADDIN_FUNCS
  27. //}}AFX_ARX_ADDIN_FUNCS
  29. void DrawFunction();
  33. ////////////////////////////////////////////////////////////////////////////
  34. //
  35. // Define the sole extension module object.
  36. AC_IMPLEMENT_EXTENSION_MODULE(Aaa1DLL);
  38. // Now you can use the CAcModuleRecourceOverride class in
  39. // your application to switch to the correct resource instance.
  40. // Please see the ObjectARX Documentation for more details
  42. /////////////////////////////////////////////////////////////////////////////
  43. // DLL Entry Point
  44. extern "C"
  45. BOOL WINAPI DllMain(HINSTANCE hInstance, DWORD dwReason, LPVOID /*lpReserved*/)
  46. {
  47. if (dwReason == DLL_PROCESS_ATTACH)
  48. {
  49.         _hdllInstance = hInstance;
  50. // Extension DLL one time initialization
  51. Aaa1DLL.AttachInstance(hInstance);
  52. InitAcUiDLL();
  53. } else if (dwReason == DLL_PROCESS_DETACH) {
  54. // Terminate the library before destructors are called
  55. Aaa1DLL.DetachInstance();
  57. }
  58. return TRUE;    // ok
  59. }
  63. /////////////////////////////////////////////////////////////////////////////
  64. // ObjectARX EntryPoint
  65. extern "C" AcRx::AppRetCode 
  66. acrxEntryPoint(AcRx::AppMsgCode msg, void* pkt)
  67. {
  68. switch (msg) {
  69. case AcRx::kInitAppMsg:
  70. // Comment out the following line if your
  71. // application should be locked into memory
  72. acrxDynamicLinker->unlockApplication(pkt);
  73. acrxDynamicLinker->registerAppMDIAware(pkt);
  74. InitApplication();
  75. break;
  76. case AcRx::kUnloadAppMsg:
  77. UnloadApplication();
  78. break;
  79. }
  80. return AcRx::kRetOK;
  81. }
  83. // Init this application. Register your
  84. // commands, reactors...
  85. void InitApplication()
  86. {
  87. // NOTE: DO NOT edit the following lines.
  88. //{{AFX_ARX_INIT
  89. //}}AFX_ARX_INIT
  91. // TODO: add your initialization functions
  92. acedRegCmds->addCommand("HELLOWORLD_COMMANDS",
  93. "Draw","Draw",ACRX_CMD_TRANSPARENT,DrawFunction);
  94. acutPrintf("可以执行命令：draw");
  96. }
  98. // Unload this application. Unregister all objects
  99. // registered in InitApplication.
  100. void UnloadApplication()
  101. {
  102. // NOTE: DO NOT edit the following lines.
  103. //{{AFX_ARX_EXIT
  104. //}}AFX_ARX_EXIT
  106. // TODO: clean up your application
  108. acedRegCmds->removeGroup("HELLOWORLD_COMMANDS");
  109. }
  111. // This functions registers an ARX command.
  112. // It can be used to read the localized command name
  113. // from a string table stored in the resources.
  114. void AddCommand(const char* cmdGroup, const char* cmdInt, const char* cmdLoc,
  115. const int cmdFlags, const AcRxFunctionPtr cmdProc, const int idLocal)
  116. {
  117. char cmdLocRes[65];
  119. // If idLocal is not -1, it's treated as an ID for
  120. // a string stored in the resources.
  121. if (idLocal != -1) {
  123. // Load strings from the string table and register the command.
  124. ::LoadString(_hdllInstance, idLocal, cmdLocRes, 64);
  125. acedRegCmds->addCommand(cmdGroup, cmdInt, cmdLocRes, cmdFlags, cmdProc);
  127. } else
  128. // idLocal is -1, so the 'hard coded'
  129. // localized function name is used.
  130. acedRegCmds->addCommand(cmdGroup, cmdInt, cmdLoc, cmdFlags, cmdProc);
  131. }
  144. #define copypt(d,s) d[X]=s[X];d[Y]=s[Y];d[Z]=s[Z];
  145. ads_point ncspt[3];//声明建立新坐标系的三个点变量
  147. double pi=3.14159265358979;
  148. int count=0;
  149. struct myread
  150. {
  151. double onlyid;    //控制点号
  152. double nameind;   //巷道名称索引号
  153. double x;
  154. double y;
  155. double z;
  156. float  ld;        //点至左邦的距离
  157. float  rd;        //点至右邦的距离
  158. float  bd;        //点至底板的距离
  159. int    ptype;     //巷道类型
  160. }buffer[50];//存放测量原始数据
  163. struct mytag        //建立巷道属性表结构
  164. {
  165. double nameind;        //索引号
  166.     char name[50];   //巷道名称
  167.     float enddist;
  168. float endhigh;
  169. float twidth;
  170. float bwidth;
  171. float wallhigh;
  172. int   tunneltype;//巷道类型
  173. }temtag;            //temtag结构存放巷道属性值
  177. //计算三点的圆心坐标放入cp点，cp[Z]=axdot[i+1][Z]-axdot[i][Z]存放两相邻点之间的高差
  178. void calcp(ads_point pt1,ads_point pt2,ads_point pt3,ads_point cp1)
  179. {
  180. double A1,A2,B1,B2,C1,C2;
  181. A1=pt1[X]-pt2[X];
  182. A2=pt3[X]-pt2[X];
  183. B1=pt1[Y]-pt2[Y];
  184. B2=pt3[Y]-pt2[Y];
  185. C1=(pt1[X]*pt1[X]+pt1[Y]*pt1[Y]-pt2[X]*pt2[X]-pt2[Y]*pt2[Y])/2;
  186.     C2=(pt3[X]*pt3[X]+pt3[Y]*pt3[Y]-pt2[X]*pt2[X]-pt2[Y]*pt2[Y])/2;
  187. cp1[Y]=(C2-A2*C1/A1)/(B2-A2*B1/A1);
  188. cp1[X]=(C1-B1*cp1[Y])/A1;
  189. // cp1[X]=(C1-B1*(C2-A2*C1/A1)/(B2-A2*B1/A1))/A1;
  190. cp1[Z]=pt1[Z];
  191. // R1=sqrt((cp1[X]-pt1[X])*(cp1[X]-pt1[X])+(cp1[Y]-pt1[Y])*(cp1[Y]-pt1[Y]));
  192. return;
  194. }//end calcp
  197. double ang(ads_point cp2,ads_point pt4)
  198. {
  199. double or;//方位角变量
  201. int rc2=0;
  202. double e,f,g;
  203. e=pt4[Y]-cp2[Y];
  204. f=pt4[X]-cp2[X];
  205. g=atan(e/f);
  206. if(g<0)
  207. g=-atan(e/f);
  209. if(e>0)
  210. {
  211. if(f>0)
  212. rc2=1;
  213. if(f<0)
  214. rc2=2;
  215. }
  216. if(e<0)
  217. {
  218. if(f<0)
  219. rc2=3;
  220. if(f>0)
  221. rc2=4;
  222. }
  223. switch(rc2)
  224. {
  225. case 0:
  226.     break;
  227.     case 1:
  228.     or=g;
  229.         break;
  230.         case 2:
  231. or=pi-g;
  232.         break;
  233. case 3:
  234. or=pi+g;
  235.         break;
  236. case 4:
  237. or=2*pi-g;
  238. break;
  239. }
  240.     if(e==0)
  241. {
  242. if(f>0)
  243. or=0.0;
  244. if(f<0)
  245. or=pi;
  246. }
  247. if(f==0)
  248. {
  249. if(e>0)
  250. or=pi/2;
  251. if(e<0)
  252. or=pi+pi/2;
  253. }
  254. return or;
  255. }//end ang()
  256. //标记巷道名称
  257. void lable(ads_point pt1,ads_point pt2,char tagtex[50])
  258. {
  259. ads_point tempt={5.0,2.50,0};                 //文本标注的左下基点
  262. ads_point pt3;
  264. pt3[X]=pt1[X]-(pt2[Y]-pt1[Y]);
  265. pt3[Y]=pt1[Y]+(pt2[X]-pt1[X]);
  266. pt3[Z]=pt1[Z];
  268. //三点法建立新坐标系    
  269.     acedCommand(RTSTR,"ucs",RTSTR,"n",RTSTR,"3",RT3DPOINT,pt1,
  270.             RT3DPOINT,pt2,RT3DPOINT,pt3,RTNONE);
  271. //在新坐标系中标注文本  
  272. acedCommand(RTSTR,"text",RTSTR,"j",RTSTR,"bl",RT3DPOINT,tempt,
  273.        RTSTR,"2",RTANG,0.0,RTSTR,tagtex,RTNONE);
  274. //恢复到世界坐标系
  275.     acedCommand(RTSTR,"ucs",RTSTR,"w",RTNONE);
  277.     
  278. }//end lable
  282. // 计算巷道中轴线点坐标，建立巷道图层，画三维巷道
  283. void rbcirc()
  284. {
  286. int i=0,j=0;
  287. int rc=0,rc1=0;
  288. ads_name ent1,ent2;
  291. //把测点坐标转换成巷道中轴线ads_point点坐标
  292. ads_point *axdot=new ads_point[count+1];
  295.     double a,b,ex,ey,c,l,d1,d2,elx,ely,etx,ety,ez;
  296. float d;
  297. for(i=0;i<count-1;i++)
  298. {
  299. a=buffer[i+1].x-buffer[i].x;
  300.     b=buffer[i+1].y-buffer[i].y;
  301.     c=sqrt(a*a+b*b);
  302.     d=(buffer[i].ld-buffer[i].rd)/2;
  303.     ex=b*d/c;
  304.     ey=a*d/c;
  306.     axdot[i][X]=buffer[i].x-ex;
  307.     axdot[i][Y]=buffer[i].y+ey;
  308.     axdot[i][Z]=buffer[i].z-buffer[i].bd;
  309. }
  311.         //计算最后一个导线点的中轴点
  312.             a=buffer[count-2].x-buffer[count-1].x;
  313.     b=buffer[count-2].y-buffer[count-1].y;
  314.     c=sqrt(a*a+b*b);
  315.     d=(buffer[count-1].rd-buffer[count-1].ld)/2;
  316.     ex=b*d/c;
  317.     ey=a*d/c;
  319.     axdot[count-1][X]=buffer[count-1].x-ex;
  320.     axdot[count-1][Y]=buffer[count-1].y+ey;
  321.     axdot[count-1][Z]=buffer[count-1].z-buffer[count-1].bd;
  322.       //计算巷道掌头的中轴点
  323.             a=axdot[count-1][X]-axdot[count-2][X];
  324.     b=axdot[count-1][Y]-axdot[count-2][Y];
  325.     c=sqrt(a*a+b*b);
  327. l=temtag.enddist;
  328.    
  329. axdot[count][X]=axdot[count-1][X]+a*l/c;
  330.     axdot[count][Y]=axdot[count-1][Y]+b*l/c;
  331.     axdot[count][Z]=temtag.endhigh;
  333. for(i=0;i<count;i++)
  334.         acutPrintf(" %lf, %lf, %fn",axdot[i][X],axdot[i][Y],axdot[i][Z]);
  337.      //对标注文本基线的两个端点赋值
  338.       int k=0;
  339.   k=int(count/2)-1;
  340.   copypt(ncspt[0], axdot[k]);
  341.           copypt(ncspt[1], axdot[k+1]);
  342.       
  344. //计算巷道断面的四个特征点三维坐标
  345. ads_point dm[4];
  346.             a=axdot[1][X]-axdot[0][X];
  347.     b=axdot[1][Y]-axdot[0][Y];
  348.     c=sqrt(a*a+b*b);
  349.     d1=temtag.twidth/2;//巷道上宽的一半
  350. d2=temtag.bwidth/2;//巷道下宽的一半
  351.             ez=temtag.wallhigh;//巷道的净高或拱形巷的墙高
  352.     elx=b*d2/c;
  353.     ely=a*d2/c;
  354.             
  355. etx=b*d1/c;
  356.     ety=a*d1/c;
  358. dm[0][X]=axdot[0][X]+etx;
  359. dm[0][Y]=axdot[0][Y]-ety;
  360.             dm[0][Z]=axdot[0][Z]+ez;
  361.             
  362. dm[1][X]=axdot[0][X]+elx;
  363. dm[1][Y]=axdot[0][Y]-ely;
  364.             dm[1][Z]=axdot[0][Z];
  365.             
  366. dm[2][X]=axdot[0][X]-elx;
  367. dm[2][Y]=axdot[0][Y]+ely;
  368.             dm[2][Z]=axdot[0][Z];
  370. dm[3][X]=axdot[0][X]-etx;
  371. dm[3][Y]=axdot[0][Y]+ety;
  372.             dm[3][Z]=axdot[0][Z]+ez;
  374. acutPrintf(" 角点坐标n n");
  375. for(i=0;i<4;i++)
  376.         acutPrintf(" %lf, %lf, %fn",dm[i][X],dm[i][Y],dm[i][Z]);
  379. //计算拱形巷道断面弧线点
  380.             ads_point ac[11];//拱形线上定义十一个三维中间点
  381. a=dm[0][X]-dm[3][X];
  382.     b=dm[0][Y]-dm[3][Y];
  383.    
  385.             float r;
  386.             r=temtag.twidth/2;//给拱形上圆半径赋值
  387.             for(i=0;i<11;i++)
  388. {
  389.     ac[i][X]=dm[3][X]+(i+1)*a/12;
  390.                 ac[i][Y]=dm[3][Y]+(i+1)*b/12;
  391.     ac[i][Z]=dm[3][Z]+sqrt(r*r-(6-(i+1))*(6-(i+1))*r*r/36);
  392. }
  393.             acutPrintf("拱线点坐标n");
  394. for(i=0;i<11;i++)
  395.         acutPrintf("%lf, %lf, %fn",ac[i][X],ac[i][Y],ac[i][Z]);
  397. rc=temtag.tunneltype;
  398. switch(rc)
  399. {
  400. case 701:
  401. acedCommand(RTSTR,"3DPOLY",RT3DPOINT,dm[3],
  402.        RT3DPOINT,ac[0],RT3DPOINT,ac[1],
  403.            RT3DPOINT,ac[2],RT3DPOINT,ac[3],
  404.            RT3DPOINT,ac[4],RT3DPOINT,ac[5],
  405.        RT3DPOINT,ac[6],RT3DPOINT,ac[7],
  406.        RT3DPOINT,ac[8],RT3DPOINT,ac[9],
  407.        RT3DPOINT,ac[10],RT3DPOINT,dm[0],
  408.        RT3DPOINT,dm[1],RT3DPOINT,dm[2],
  409.        RT3DPOINT,dm[3],RTSTR,"",RTNONE);
  410. break;
  411. case 702:
  412.         acedCommand(RTSTR,"3DPOLY",RT3DPOINT,dm[3],
  413.            RT3DPOINT,dm[0],RT3DPOINT,dm[1],
  414.        RT3DPOINT,dm[2],RT3DPOINT,dm[3],
  415.            RTSTR,"",RTNONE);
  416.      break;
  417. case 703:
  418.    
  419.   acedCommand(RTSTR,"circle",RT3DPOINT,axdot[0],RTREAL,temtag.twidth,RTNONE);
  420.    
  421.         break;
  423. }
  425.    //获得拉伸断面的实体
  426.     if(ads_entlast(ent1) != RTNORM)
  427. {
  428.   ads_fail("nFaile creat last entry.");
  429.   return; 
  430.  }
  432.   
  433.  
  434.         ads_point cp;
  435. double or1=0.0,or2=0.0,or3,or12;
  436. double R=0.0,h;
  437. ads_point mdpt[6];           //声明一个六个点的数组存放圆弧中间插值点的坐标
  439. for(i=0;i<count;i++)
  440. {
  441.         rc1=buffer[i].ptype;
  444. //绘制巷道三维轴线
  445. switch(rc1)
  446. {
  447. case 1:
  448. acedCommand(RTSTR,"3DPOLY",RT3DPOINT,axdot[i],RT3DPOINT,axdot[i+1],RTNONE);
  449. break;
  451. case 2:
  454. calcp(axdot[i],axdot[i+1],axdot[i+2],cp);//计算三点的圆心坐标放入cp点，cp[Z]=axdot[i+1][Z]-axdot[i][Z]
  455.  acutPrintf("下面是cp值n"); 
  456. acutPrintf("%lf,%lf,%lfn",cp[X],cp[Y],cp[Z]);
  458. R=sqrt((cp[X]-axdot[i][X])*(cp[X]-axdot[i][X])+(cp[Y]-axdot[i][Y])*(cp[Y]-axdot[i][Y]));
  460. or1=ang(cp,axdot[i]);         //计算起点与圆心的方位角
  461. or2=ang(cp,axdot[i+1]);       //计算终点与圆心的方位角
  462. or12=or2-or1;                 //计算起点与终点的方位角差值
  463. //判断or12值的取向
  464. if(or12>pi)
  465. or12=or12-2*pi;
  466. if(or12<-pi)
  467. or12=2*pi+or12;
  470. h=axdot[i+1][Z]-axdot[i][Z];
  473. for(j=0;j<5;j++)
  474. {
  475. or3=or1+(j+1)*or12/6;
  476. mdpt[j][X]=cp[X]+R*cos(or3);
  477.                 mdpt[j][Y]=cp[Y]+R*sin(or3);
  478. mdpt[j][Z]=axdot[i][Z]+(j+1)*h/6;
  479. }
  480. acutPrintf("下面是mdpt值n"); 
  481.             for(j=0;j<5;j++)
  482. acutPrintf("%lf, %lf, %lfn",mdpt[j][X],mdpt[j][Y],mdpt[j][Z]);
  486. //画出axdot[i]到axdot[i+1]之间的弧线
  487. acedCommand(RTSTR,"3DPOLY",RT3DPOINT,axdot[i],
  488.                 RT3DPOINT,mdpt[0],RT3DPOINT,mdpt[1],
  489.                     RT3DPOINT,mdpt[2],RT3DPOINT,mdpt[3],
  490.                     RT3DPOINT,mdpt[4],RT3DPOINT,axdot[i+1],
  491.                 RTNONE);
  492. break;
  494. case 3:
  495.         or1=ang(cp,axdot[i]);         //计算起点与圆心的方位角，结果放入or1内。
  496. or2=ang(cp,axdot[i+1]);       //计算终点与圆心的方位角，结果放入or2内。
  497. or12=or2-or1;                 //计算起点与终点的方位角差值
  498. //判断or12值的取向
  499. if(or12>pi)
  500. or12=or12-2*pi;
  501. if(or12<-pi)
  502. or12=2*pi+or12;
  504. h=axdot[i+1][Z]-axdot[i][Z];
  506. for(j=0;j<5;j++)
  507. {
  508. or3=or1+(j+1)*or12/6;
  509. mdpt[j][X]=cp[X]+R*cos(or3);
  510.                 mdpt[j][Y]=cp[Y]+R*sin(or3);
  511. mdpt[j][Z]=axdot[i][Z]+(j+1)*h/6;
  512. }
  514. //画出axdot[i]到axdot[i+1]之间的弧线
  515. acedCommand(RTSTR,"3DPOLY",RT3DPOINT,axdot[i],
  516.                 RT3DPOINT,mdpt[0],RT3DPOINT,mdpt[1],
  517.                     RT3DPOINT,mdpt[2],RT3DPOINT,mdpt[3],
  518.                     RT3DPOINT,mdpt[4],RT3DPOINT,axdot[i+1],
  519.                 RTNONE);
  520. break;
  521.             
  522. //画煤仓标注基线
  523. case 4:
  524. acedCommand(RTSTR,"3DPOLY",RT3DPOINT,axdot[i],RT3DPOINT,axdot[i+1],RTNONE);
  525. break;
  527. }//switch
  529.       }//for
  531. acedCommand(RTSTR,"",RTNONE);
  533.   
  534. //获得拉伸路径实体
  535.     if(ads_entlast(ent2) != RTNORM)
  536. {
  537.    ads_fail("nFaile creat last entry.");
  538.    return;
  539.  }
  542.     //把煤仓分成圆柱和圆椎
  543.     if(rc==703)
  544. {
  546. //画柱部分
  547. double hh;
  549. hh=buffer[count-1].z-buffer[0].z;
  550. acedCommand(RTSTR,"EXTRUDE",RTENAME,ent1,RTSTR,"",RTREAL,hh,RTANG,0.0,RTNONE);
  552.         //画圆锥部分
  554.    hh=temtag.endhigh-buffer[count-1].z;
  555.   
  556.           acedCommand(RTSTR,"cone",RT3DPOINT,axdot[count-1],RTREAL,temtag.twidth,
  557.           RTREAL,hh,RTNONE);
  559. }
  560. else
  561.      //下面是巷道的拉伸命令
  562.      acedCommand(RTSTR,"EXTRUDE",RTENAME,ent1,RTSTR,"",RTSTR,"P",RTENAME,ent2,RTNONE);
  563.    
  565. return;
  567. }
  570. void createNewLayer(char* lyrname, Adesk::UInt16 clr, AcDbObjectId ltypeId, Adesk::Boolean current)
  571. {
  572. // We need to check if the layer name exists
  573. // If the layer name exists, apply the color
  574. // linetype id and whither to make it current
  575. // or not. In order to be current it cannot be
  576. // frozen, so we need to check for this also.
  577. // If the layer name does not exist we just create
  578. // a new layer with the properties contained in the arguments
  580. AcDbLayerTable *pLyrTable;
  581. AcDbLayerTableRecord *pLyrTblRecord;
  582. AcDbObjectId recId;
  584. AcCmColor color;
  585. color.setColorIndex(clr); // set color to parameter clr
  587. AcDbDatabase *pCurDb = NULL;
  589. pCurDb = acdbHostApplicationServices()->workingDatabase();
  592. pCurDb->getLayerTable(pLyrTable, AcDb::kForRead);
  593. // Check to see if the layer name exists
  594. if(pLyrTable->has(lyrname))
  595. {
  596. pLyrTable->getAt(lyrname, pLyrTblRecord, AcDb::kForWrite, Adesk::kFalse);
  597. // pLyrTblRecord now points at the layer table record
  598. // which was opened for write
  599. pLyrTblRecord->setIsFrozen(Adesk::kFalse);
  600. pLyrTblRecord->setColor(color);
  601. pLyrTblRecord->setLinetypeObjectId(ltypeId);
  603. }
  604. else
  605. {
  606. // Note how we can change the open mode
  607. // of the layer table from AcDb::kForRead
  608. // to AcDb::kForWrite
  610. pLyrTable->upgradeOpen();
  611. pLyrTblRecord = new AcDbLayerTableRecord;
  613. pLyrTblRecord->setName(lyrname);
  614. pLyrTblRecord->setColor(color);
  615. pLyrTblRecord->setLinetypeObjectId(ltypeId);
  617. pLyrTable->add(pLyrTblRecord);
  619. }
  621. // Get the layer Table ObjectId
  622. recId = pLyrTblRecord->objectId();
  624. pLyrTblRecord->close();
  625. pLyrTable->close();
  627. // Set the layer current if current
  628. // is equal to Adesk::kTrue
  629. // pCurDb is point to the current
  630. // drawing database
  631. // The database AcDbDatabase has a number of
  632. // query and edit functions for the header variables
  634. if(current)
  635. {
  636. pCurDb->setClayer(recId);
  637. }
  639. }
  644. // This is command ' DrawFunction()'
  645. void DrawFunction()
  646. {
  647.      
  649. const char* title = "打开数据文件";           //设置对话框标题
  650. const char* default1 = "D:/wzy/";   //设置文件默认路径
  651. struct resbuf *fname;
  652.     char* pFILENAME;                 //声明指向文件的指针
  654. fname = acutNewRb(RTSTR);        //为指针设置内存空间
  656.     //获得打开文件的对话框
  657. if(acedGetFileD(title,default1,"mdb",0,fname)==RTNORM)
  658. {
  659. pFILENAME=fname->resval.rstring;
  660.      CString FILENAME=pFILENAME;            //把文件路径字符串付值给FILENAME变量
  665. int Indx=0;
  668.      char attQuery[256];
  669.      sprintf(attQuery,"SELECT * FROM 巷道属性表");//设置SQL查寻语句
  672.     
  673. CDaoDatabase db;                    //声明一个数据库对象
  676.        //按指定路径打开数据库
  677. db.Open(FILENAME,FALSE,FALSE,_T(""));
  679. CDaoRecordset pt_rs(&db);//记录集与数据库连接
  680. CDaoRecordset att_rs(&db);//记录集与数据库连接
  681.         if (att_rs.IsOpen()) att_rs.Close();
  682. att_rs.Open(dbOpenDynaset,attQuery,0);//动态打开记录集
  685. //读取属性表数据
  686. int iRecords =att_rs.GetRecordCount();//统计记录个数
  687.         if (!att_rs.IsBOF()) att_rs.MoveFirst();//把指针移到开始处
  688.         
  689. while (!att_rs.IsEOF()) 
  690. {
  691.             COleVariant vNameInd =att_rs.GetFieldValue("NameIndex");
  692.             COleVariant vTunName =att_rs.GetFieldValue("Name");
  693. COleVariant vEndDist = att_rs.GetFieldValue("EndDist");
  694.             COleVariant vEndHigh = att_rs.GetFieldValue("EndHigh");
  695.             COleVariant vTopWidth = att_rs.GetFieldValue("TopWith");
  696.             COleVariant vButWidth = att_rs.GetFieldValue("ButtomWith");
  697.             COleVariant vWallHigh = att_rs.GetFieldValue("WallHigh");
  698.             COleVariant vTunType = att_rs.GetFieldValue("Tunneltype");
  700. //程序结构变量提取属性数据库字段值
  702. temtag.nameind=vNameInd.lVal;   //巷道名称索引号
  703. // strcpy(temtag.name,vTunName.bstrVal);//巷道名称字符串
  704. sprintf(temtag.name,"%s",vTunName.bstrVal);
  706. temtag.enddist=vEndDist.fltVal;   //点至掌头的距离
  707. temtag.endhigh=vEndHigh.fltVal;   //掌头底板高程或煤仓底部高程
  708. temtag.twidth=vTopWidth.fltVal;   //巷道断面上宽或煤仓半径
  709. temtag.bwidth=vButWidth.fltVal;   //巷道断面下宽
  710. temtag.wallhigh=vWallHigh.fltVal; //拱形指墙高，非拱形指净高
  711. temtag.tunneltype=vTunType.intVal;//巷道断面类型:701-拱形；703-圆形；702-其它
  713.             char ptQuery[256];
  714. // CString strSQL;
  715. // strSQL="SELECT * FROM 巷道控制点数据 WHERE NameIndex=temtag.nameind";
  716.             sprintf(ptQuery,"SELECT * FROM 巷道控制点数据 WHERE NameIndex=%lf",temtag.nameind);
  718.              if (pt_rs.IsOpen()) pt_rs.Close();
  719.      pt_rs.Open(dbOpenDynaset,ptQuery);
  720.              //读取巷道控制点坐标表数据
  721.      int iPtRecords =pt_rs.GetRecordCount();
  722.              if (!pt_rs.IsEOF()) pt_rs.MoveFirst();
  723.              
  724.  Indx=0;//点记录集索引号清为零
  725.                  
  726.  while (!pt_rs.IsEOF()) 
  727.  {
  728.  COleVariant vOnlyID = pt_rs.GetFieldValue("OnlyID");//点唯一编号
  729.                      COleVariant vX = pt_rs.GetFieldValue("X");//测点X坐标
  730.              COleVariant vY = pt_rs.GetFieldValue("Y");//测点Y坐标
  731.                      COleVariant vZ = pt_rs.GetFieldValue("Z");//测点高程
  732.                      COleVariant vLD = pt_rs.GetFieldValue("LD");//测点至左邦距离
  733.                      COleVariant vRD = pt_rs.GetFieldValue("RD");//测点至右邦距离
  734.                      COleVariant vBD = pt_rs.GetFieldValue("BD");//测点至巷道底板值
  735.                      COleVariant vPType = pt_rs.GetFieldValue("PType");//1-直线点，2-曲线起点，3-曲线中间点
  737.          //程序结构变量提取巷道坐标数据库字段值
  739.  buffer[Indx].onlyid=vOnlyID.dblVal;
  740.                  buffer[Indx].x=vX.dblVal;
  741.                  buffer[Indx].y=vY.dblVal;
  742.      buffer[Indx].z=vZ.dblVal;
  743.                   buffer[Indx].ld=vLD.fltVal;
  744.                      buffer[Indx].rd=vRD.fltVal;
  745.      buffer[Indx].bd=vBD.fltVal;
  746.                   buffer[Indx].ptype=vPType.intVal;
  748.  Indx++;
  749.                      
  750.  pt_rs.MoveNext();//指到下一条点集记录
  751.  }//内循环结束(while)
  753.  count=Indx;//记录巷道控制点数
  754.                  pt_rs.Close();//关闭点记录集
  756.  //                   for(i=0;i<Indx;i++)
  757. // printf("%lf,%lf,%lf,%lfn",buffer[Indx].onlyid,buffer[Indx].x,buffer[Indx].y,buffer[Indx].z);
  760.  
  761. char lyrTunnel[50]="巷道";
  762. char lyrName[50]="名称";
  764. int col; // Color value
  766. AcDbObjectId ltypeId; // We need the object id of the linetype
  767. // for layer creation
  768.     AcDbDatabase *pCurDb = NULL;
  769. AcDbLinetypeTable *pltTable;
  770. pCurDb = acdbHostApplicationServices()->workingDatabase();
  771.     pCurDb->getLinetypeTable(pltTable, AcDb::kForRead);
  772. pltTable->getAt("CONTINUOUS", ltypeId);
  773. pltTable->close();
  775.     col=6;//巷道层颜色值
  777.     createNewLayer(lyrTunnel, col, ltypeId, Adesk::kTrue);//建立巷道图层
  778.     rbcirc();//计算巷中道轴线坐标绘制巷道
  779.    
  780.     col=4;//文本层颜色值
  781.     createNewLayer(lyrName, col, ltypeId, Adesk::kTrue);//建立文本图层
  783.     lable(ncspt[0],ncspt[1],temtag.name);//标注刚刚绘出的巷道名称
  784.                  
  786.  att_rs.MoveNext();//指到下一条属性集记录
  788. }//外循环结束
  789.                
  790. att_rs.Close();//关闭属性记录集
  792.         db.Close();
  797. }//end if
  800.    return;
  803. }