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

源码开发语言/平台
当前位置：首页 > 源码/资料 > 图形图像 > CAD > 查看源码
calculate.cpp
资源名称：FileSwitch.rar　[点击查看]
上传用户：hell82222
上传日期：2013-12-19
资源大小：1872k
文件大小：33k
源码类别：

CAD

开发平台：

Visual C++

calculate.cpp：源码内容
  1. #include "stdafx.h"
  2. #include "FileSwitch.h"
  3. #include "Reader.h"
  4. #include "DwgReader.h"
  5. #include "KmSection.h"
  6. #include "CShow.h"
  8. #ifdef _DEBUG
  9. #undef THIS_FILE
  10. static char THIS_FILE[]=__FILE__;
  11. #define new DEBUG_NEW
  12. #endif
  14. CString CReader::m_strACADpath="";
  15. CString CReader::m_strAddPath="";
  16. double CReader::calculate_3d2pdistance(double x1,double y1,double z1,double x2,double y2,double z2)
  17. {
  18. return sqrt( (x1-x2)*(x1-x2)+(y1-y2)*(y1-y2)+(z1-z2)*(z1-z2) );
  19. }
  20. double CReader::calculate_3ddpdistance(double dx,double dy,double dz)
  21. {
  22. return sqrt( dx*dx+dy*dy+dz*dz );
  23. }
  24. double CReader::calculate_2dangle(double dx,double dy)
  25. {
  26. double r=sqrt(dx*dx+dy*dy);
  27. if(r<0.00000001)
  28. {
  29. return 0;
  30. }
  31. double cosv=dx/r;
  32. if(cosv>=1.0)
  33. {
  34. return 0;
  35. }
  36. if(cosv<=-1.0)
  37. {
  38. return PI;
  39. }
  40. double sinv=dy/r;
  41. if(sinv>=0)
  42. {
  43. return acos(cosv);
  44. }
  45. else
  46. {
  47. return (2*PI-acos(cosv));
  48. }
  49. }
  50. KmPoint CReader::calculate_2drotate(double xo,double yo,double dx,double dy,double ra)
  51. {
  52. KmMatrix matrix;//旋转矩阵
  53. matrix.r11 = cos(ra);
  54. matrix.r21 = sin(ra);
  55. matrix.r31 = 0.0;
  56. matrix.r12 = -sin(ra);   
  57. matrix.r22 = cos(ra);
  58. matrix.r32 = 0.0;
  59. matrix.r13 = xo*(1.0 - cos(ra)) + yo*sin(ra);
  60. matrix.r23 = yo*(1.0 - cos(ra)) - xo*sin(ra);
  61. matrix.r33 = 1.0;
  62. KmPoint pt(xo+dx,yo+dy);
  63.     pt = matrix * pt;
  64. return pt;
  65. }
  66. void CDwgReader::calculate_3dbulgelines(CArray<CVector*,CVector*>&avectors)
  67. {
  68. for(int i=1;i<avectors.GetSize();i++)
  69. {
  70. if(fabs(avectors[i-1]->m_bulge)<= 1e-6)
  71. {
  72. if(avectors[i-1]->m_bwidth&&avectors[i-1]->m_widthbegin<1.0e-6)
  73. {
  74. m_pConverter->ConverterEntiey_KmArrowHead(avectors[i-1]->m_x,avectors[i-1]->m_y,avectors[i]->m_x,avectors[i]->m_y,avectors[i-1]->m_widthend);
  75. }
  76. else if(avectors[i-1]->m_bwidth&&avectors[i-1]->m_widthend<1.0e-6)
  77. {
  78. m_pConverter->ConverterEntiey_KmArrowHead(avectors[i]->m_x,avectors[i]->m_y,avectors[i-1]->m_x,avectors[i-1]->m_y,avectors[i-1]->m_widthbegin);
  79. }
  80. else
  81. {
  82. m_pConverter->ConverterEntiey_KmLine(avectors[i-1]->m_x,avectors[i-1]->m_y,avectors[i-1]->m_z,avectors[i]->m_x,avectors[i]->m_y,avectors[i]->m_z);
  83. }
  84. }
  85. else
  86. {
  87. double b = sqrt( (avectors[i-1]->m_x-avectors[i]->m_x)*(avectors[i-1]->m_x-avectors[i]->m_x)+
  88. (avectors[i-1]->m_y-avectors[i]->m_y)*(avectors[i-1]->m_y-avectors[i]->m_y) );
  89. double d = fabs( b/2/(2*avectors[i-1]->m_bulge/(1-avectors[i-1]->m_bulge*avectors[i-1]->m_bulge) ) );
  90. double bert;
  91. if(avectors[i-1]->m_bulge<0)
  92. {
  93. if( (avectors[i-1]->m_bulge + 1) < 0 )
  94. {
  95. bert=atan2(avectors[i]->m_y-avectors[i-1]->m_y,avectors[i]->m_x-avectors[i-1]->m_x) - PI/2;
  96. }
  97. else 
  98. {
  99. bert=atan2(avectors[i]->m_y-avectors[i-1]->m_y,avectors[i]->m_x-avectors[i-1]->m_x) + PI/2;
  100. }
  101. }
  102. else
  103. {
  104. if( (avectors[i-1]->m_bulge - 1) > 0 )
  105. {
  106. bert=atan2(avectors[i]->m_y-avectors[i-1]->m_y,avectors[i]->m_x-avectors[i-1]->m_x) + PI/2;
  107. }
  108. else 
  109. {
  110. bert=atan2(avectors[i]->m_y-avectors[i-1]->m_y,avectors[i]->m_x-avectors[i-1]->m_x) - PI/2;
  111. }
  112. }
  113. double radius = sqrt((b/2)*(b/2) + d*d );
  114. double cir_x = (avectors[i-1]->m_x+avectors[i]->m_x)/2 - d*cos(bert);
  115. double cir_y = (avectors[i-1]->m_y+avectors[i]->m_y)/2 - d*sin(bert);
  116. double b_angle = atan2( avectors[i-1]->m_y-cir_y, avectors[i-1]->m_x-cir_x );
  117. double e_angle = atan2( avectors[i]->m_y-cir_y, avectors[i]->m_x-cir_x );
  118. if(avectors[i-1]->m_bulge<0)
  119. {
  120. m_pConverter->ConverterEntiey_KmArc(cir_x,cir_y,0,radius,e_angle,b_angle);
  121. }
  122. else
  123. {
  124. m_pConverter->ConverterEntiey_KmArc(cir_x,cir_y,0,radius,b_angle,e_angle);
  125. }
  126. }
  127. }
  128. }
  129. BOOL CDwgReader::calculate_BackView()
  130. {
  131. if(adenhd->entflags&AD_EXTRUSION_INFO_VALID)
  132. {
  133. if(fabs(adenhd->extrusion[0])<0.00000001)
  134. {
  135. if(fabs(adenhd->extrusion[1])<0.00000001)
  136. {
  137. if(fabs(adenhd->extrusion[2]+1.0)<0.00000001)
  138. {
  139. return TRUE;
  140. }
  141. }
  142. }
  143. }
  144. return FALSE;
  145. }
  147. //搜索dwg图纸所用的文件,并将它拷贝到kmcad的同名目录中.
  148. void CReader::calculate_DefaultExamineFile(CString& filename2,CString sondir,CString sonkmdir)
  149. {
  150. if(sonkmdir.IsEmpty())sonkmdir=sondir;
  151. CString temppath;
  152. CString tempname;
  153. for(int index=0;index<filename2.GetLength();index++)
  154. {
  155. if(filename2[index]=='\')
  156. {
  157. if(!tempname.IsEmpty())
  158. {
  159. temppath+=tempname;
  160. temppath+="\";
  161. tempname.Empty();
  162. }
  163. }
  164. else
  165. {
  166. tempname+=filename2[index];
  167. }
  168. }
  169. if(!temppath.IsEmpty())
  170. {
  171. CString filetemp=temppath+tempname;
  172. CFileFind filefind;
  173. if( filefind.FindFile(filetemp) )
  174. {
  175. calculate_CopyFile(filetemp,tempname,sonkmdir);
  176. filefind.Close();
  177. }
  178. }
  179. CString filename=filename2=tempname;
  181. for(int i=0;i<=1;i++)
  182. {
  183. if((i==1)&&(filename2!=filename))
  184. {
  185. filename2=filename;
  186. }
  187. else if(i==1)
  188. {
  189. //没有找到型文件
  190. break;
  191. }
  192. CFileFind filefind;
  195. //1.直接在kmcad的目录中寻找.
  196. {
  197. TCHAR szFileName[MAX_PATH]; 
  198. ::GetModuleFileName(::GetModuleHandle(_T("FileSwitch.dll")),szFileName,MAX_PATH); 
  199. (*_tcsrchr(szFileName,'\'))=''; 
  200. CString strPath=szFileName;
  201. strPath+="\";
  202. strPath+=sonkmdir;
  203. strPath+="\";
  204. strPath+=filename;
  205. if(filefind.FindFile(strPath))
  206. {
  207. filename=strPath;
  208. filefind.Close();
  209. return;
  210. }
  211. }
  212. //2.直接在硬盘上搜索该文件.
  213. if(filefind.FindFile(filename))
  214. {
  215. CString name;
  216. for(int i=filename.GetLength();i>0;i--)
  217. {
  218. if(filename.GetAt(i-1)=='\')
  219. {
  220. break;
  221. }
  222. if(filename.GetAt(i-1)=='/')
  223. {
  224. break;
  225. }
  226. name+=filename.GetAt(i-1);
  227. }
  228. filename=calculate_CopyFile(filename,name,sonkmdir);
  229. filefind.Close();
  230. return;
  231. }
  232. if(!m_strAddPath.IsEmpty())
  233. {
  234. CString filenametemp;
  235. filenametemp=m_strAddPath+tempname;
  236. if(filefind.FindFile(filenametemp))
  237. {
  238. CString name;
  239. for(int i=filenametemp.GetLength();i>0;i--)
  240. {
  241. if(filenametemp.GetAt(i-1)=='\')
  242. {
  243. break;
  244. }
  245. if(filenametemp.GetAt(i-1)=='/')
  246. {
  247. break;
  248. }
  249. name+=filenametemp.GetAt(i-1);
  250. }
  251. filenametemp=calculate_CopyFile(filenametemp,name,sonkmdir);
  252. filefind.Close();
  253. return;
  254. }
  255. }
  256. //3.在用户提供的acad路径中寻找该文件.
  257. CString strPath;
  258. for(int i=0;i<m_strACADpath.GetLength();i++)
  259. {
  260. if(m_strACADpath.GetAt(i)!=';')
  261. {
  262. strPath+=m_strACADpath.GetAt(i);
  263. }
  264. else
  265. {
  266. if(strPath.GetLength()>0)
  267. {
  268. if(strPath.GetAt(strPath.GetLength()-1)!='\')
  269. {
  270. strPath+="\";
  271. }
  272. if(sondir.GetLength()>0)
  273. {
  274. strPath+=sondir;
  275. strPath+='\';
  276. }
  277. strPath+=filename;
  278. if(filefind.FindFile(strPath))
  279. {
  280. filename=calculate_CopyFile(strPath,filename,sonkmdir);
  281. return;
  282. }
  283. }
  284. strPath.Empty();
  285. }
  286. }
  287. //3.在系统环境中寻找.
  288. char *envptr;
  289. if ((envptr=getenv("ACAD"))!=NULL)//在系统路径中寻找
  290. {
  291. CString strPaths=envptr;
  292. for(int i=0;i<strPaths.GetLength();i++)
  293. {
  294. if(strPaths.GetAt(i)!=';')
  295. {
  296. strPath+=strPaths.GetAt(i);
  297. }
  298. else
  299. {
  300. if(strPath.GetLength()>0)
  301. {
  302. if(strPath.GetAt(strPath.GetLength()-1)!='\')
  303. {
  304. strPath+="\";
  305. }
  306. CString strTemp=strPath;
  307. if(sondir.GetLength()>0)
  308. {
  309. strPath+=sondir;
  310. strPath+='\';
  311. }
  312. strTemp+=filename;
  313. if(filefind.FindFile(strTemp))
  314. {
  315. filename=calculate_CopyFile(strPath,filename,sonkmdir);
  316. filefind.Close();
  317. return;
  318. }
  319. strPath+=filename;
  320. if(filefind.FindFile(strPath))
  321. {
  322. filename=calculate_CopyFile(strPath,filename,sonkmdir);
  323. filefind.Close();
  324. return;
  325. }
  326. }
  327. strPath.Empty();
  328. }
  329. }
  330. }
  331. //5.在注册表中寻找.
  332. //○1通过RegOpenKey函数打开注册表.
  333. HKEY hKey;
  334. if(RegOpenKey(HKEY_LOCAL_MACHINE,"Software\Autodesk\AutoCAD",&hKey)==ERROR_SUCCESS)
  335. {
  336. //○2通过RegQueryValueEx进行键值查询.
  337. DWORD dwType=REG_SZ;
  338. BYTE szData[100];
  339. DWORD dwSize=sizeof(szData);
  340. if(RegQueryValueEx(hKey,"CurVer",0,&dwType,szData,&dwSize)==ERROR_SUCCESS)
  341. {
  342. CString strKey="Software\Autodesk\AutoCAD\";
  343. strKey+=(char*)szData;
  344. if(RegOpenKey(HKEY_LOCAL_MACHINE,strKey,&hKey)==ERROR_SUCCESS)
  345. {
  346. dwSize=sizeof(szData);
  347. if(RegQueryValueEx(hKey,"CurVer",0,&dwType,szData,&dwSize)==ERROR_SUCCESS)
  348. {
  349. strKey+='\';
  350. strKey+=(char*)szData;
  351. if(RegOpenKey(HKEY_LOCAL_MACHINE,strKey,&hKey)==ERROR_SUCCESS)
  352. {
  353. dwSize=sizeof(szData);
  354. if(RegQueryValueEx(hKey,"AcadLocation",0,&dwType,szData,&dwSize)==ERROR_SUCCESS)
  355. {
  356. strPath.Empty();
  357. strPath=(char*)szData;
  358. if(strPath.GetLength()>0)
  359. {
  360. if(strPath.GetAt(strPath.GetLength()-1)!='\')
  361. {
  362. strPath+="\";
  363. }
  364. if(sondir.GetLength()>0)
  365. {
  366. strPath+=sondir;
  367. strPath+='\';
  368. }
  369. strPath+=filename;
  370. if(filefind.FindFile(strPath))
  371. {
  372. filename=calculate_CopyFile(strPath,filename,sonkmdir);
  373. return;
  374. }
  375. }
  376. strPath.Empty();
  377. }
  378. }
  379. }
  380. }
  381. }
  382. }
  383. }
  384. //filefind.Close();
  385. //没有找到型文件
  386. }
  387. CString CReader::calculate_CopyFile(CString fullfilename,CString filename,CString sondir)
  388. {
  389. CFileFind filefind;
  390. CString strPath;
  391. {
  392. TCHAR szFileName[MAX_PATH]; 
  393. ::GetModuleFileName(::GetModuleHandle(_T("FileSwitch.dll")),szFileName,MAX_PATH); 
  394. (*_tcsrchr(szFileName,'\'))=''; 
  395. strPath=szFileName;
  396. strPath+="\";
  397. strPath+=sondir;
  398. strPath+="\";
  399. strPath+=filename;
  400. if(filefind.FindFile(strPath))
  401. {
  402. filefind.Close();
  403. return strPath;
  404. }
  405. }
  406. if(!filefind.FindFile(fullfilename))
  407. {
  408. //错误:没有找到指定的文件.
  409. filefind.Close();
  410. return fullfilename;
  411. }
  412. //copy file fullfilename to strpath
  413. {
  414. ::CopyFile(fullfilename,strPath,TRUE);
  415. }
  416. if(filefind.FindFile(strPath))
  417. {
  418. filefind.Close();
  419. return strPath;
  420. }
  421. filefind.Close();
  422. return fullfilename;
  423. }
  424. void CReader::calculate_path_line(PATH2* path,double x1,double y1,double x2,double y2)
  425. {
  426. path->points.Add(KmPoint(x1,y1));
  427. path->bugle.Add(1);
  428. path->Center.Add(KmPoint(x2,y2));
  429. path->Radius.Add(0);
  430. path->b_angle.Add(0);
  431. path->e_angle.Add(0);
  432. }
  434. void CReader::calculate_path_arc(PATH2* path,double x1,double y1,double r,double ba,double ea,short full)
  435. {
  437. double b_angle=ba;//作逆弧处理
  438. double e_angle=ea;
  439. if(full)
  440. {
  441. path->points.Add(KmPoint(0,0));
  442. path->bugle.Add(0);
  443. path->Center.Add(KmPoint(x1,y1));
  444. path->Radius.Add(r);
  445. path->b_angle.Add(0);
  446. path->e_angle.Add(360);
  447. }
  448. else
  449. {
  450. path->points.Add(KmPoint(0,0));
  451. path->bugle.Add(0);
  452. path->Center.Add(KmPoint(x1,y1));
  453. path->Radius.Add(r);
  454. path->b_angle.Add(ba);
  455. path->e_angle.Add(ea);
  456. }
  457. }
  459. void CReader::calculate_path_object(PATH2* path,KmObject* pObj)
  460. {
  461. KmBuffer aBuffer;
  462. S_LINE_BUFFER* pLineBuffer;
  463.     S_CIRCLE_BUFFER* pCircleBuffer;
  464. CShow* pShow = new CGDIShow((CWnd*)NULL);
  465. pObj->Draw(pShow,0,DRAWPRESENT,&aBuffer);
  467. for(int i=0;i<aBuffer.GetLineBuffSize();i++)
  468. {
  469. pLineBuffer=aBuffer.GetLineEnt(i);
  470. calculate_path_line(path,pLineBuffer->P1.x,pLineBuffer->P1.y,pLineBuffer->P2.x,pLineBuffer->P2.y);
  471. }
  472. for(i=0;i<aBuffer.GetCircleBuffSize();i++)
  473. {
  474. pCircleBuffer=aBuffer.GetCircleEnt(i);
  475. if(pCircleBuffer->message&MESSAGE_CIRCLE_FULL)
  476. {
  477. calculate_path_arc(path,pCircleBuffer->center.x,pCircleBuffer->center.y,pCircleBuffer->radius,0,0,1);
  478. }
  479. else if(pCircleBuffer->message&MESSAGE_CIRCLE_NEGATIVE)//顺弧
  480. {
  481. calculate_path_arc(path,pCircleBuffer->center.x,pCircleBuffer->center.y,pCircleBuffer->radius,pCircleBuffer->e_angle,pCircleBuffer->b_angle,0);
  482. }
  483. else
  484. {
  485. calculate_path_arc(path,pCircleBuffer->center.x,pCircleBuffer->center.y,pCircleBuffer->radius,pCircleBuffer->b_angle,pCircleBuffer->e_angle,0);
  486. }
  487. }
  488. aBuffer.ClearKmBuffer();
  489. delete pShow;
  490. }
  492. void CReader::calculate_path_bugleline(PATH2* path,double x1,double y1,double bugle,double x2,double y2)
  493. {
  494. if(fabs(bugle)<0.0000001)
  495. {
  496. calculate_path_line(path,x1,y1,x2,y2);
  497. return;
  498. }
  499. KmCircle* pCircle=new KmCircle; 
  500. /*
  501. KmPoint Point_X1;        //存放圆上的第三点
  502. KmPoint Point_X2;        //存放圆上的第三点
  503. KmPoint Point_X3;        //存放圆上的第三点
  504. Point_X1.x=x1;
  505. Point_X1.x=y1;
  506. Point_X2.x=x2;
  507. Point_X2.x=y2;
  508. KmPoint ChangPoint;
  509. KmPoint MidPoint;        //弦Point_X1Point_X2上的中点
  510. double   length  ;        //Point_X1，Point_X2之间线段长度
  511. double   hight;           //弦Point_X1Point_X2上的高
  512. double   borderlen;
  513. double   SaveAngle;       //与弧相关角的SIN或COS值
  514. double   X;
  515.  
  516. length=sqrt((Point_X1.x-Point_X2.x)*(Point_X1.x-Point_X2.x)+(Point_X1.y-Point_X2.y)*(Point_X1.y-Point_X2.y));
  517. hight=(length*bugle)/2;
  518.     MidPoint.x=(Point_X1.x+Point_X2.x)/2;
  519.     MidPoint.y=(Point_X1.y+Point_X2.y)/2;
  520. if((Point_X1.y==MidPoint.y)&&(Point_X1.x>MidPoint.x))//当弦与X轴平行
  521. {
  522. Point_X3.y=MidPoint.y+hight;
  523. Point_X3.x=MidPoint.x;
  524. }
  525. else if((Point_X1.y==MidPoint.y)&&(Point_X1.x<MidPoint.x))//当弦与Y轴平行
  526. {
  527. Point_X3.y=MidPoint.y-hight;
  528. Point_X3.x=MidPoint.x;
  529. }
  530. else
  531. {
  532. if(bugle>0)  //弧为逆时针方向
  533. {
  534. borderlen=fabs(MidPoint.x-Point_X2.x);
  535. SaveAngle=borderlen/length*2;             
  536. if((Point_X2.y>Point_X1.y)&&(Point_X2.x<Point_X1.x))
  537. {
  538. Point_X3.y=MidPoint.y+(hight*SaveAngle);
  539. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  540. Point_X3.x=MidPoint.x+X;
  541. }
  542. else if((Point_X2.y>Point_X1.y)&&(Point_X2.x>Point_X1.x))
  543. {
  544. Point_X3.y=MidPoint.y-(hight*SaveAngle);
  545. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  546. Point_X3.x=MidPoint.x+X;
  547. }
  548. else if((Point_X2.y<Point_X1.y)&&(Point_X2.x>Point_X1.x))
  549. {
  550. Point_X3.y=MidPoint.y-(hight*SaveAngle);
  551. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  552. Point_X3.x=MidPoint.x-X;
  553. }
  554. else if((Point_X2.y<Point_X1.y)&&(Point_X2.x<Point_X1.x))
  555. {
  556. Point_X3.y=(MidPoint.y+(hight*SaveAngle));
  557. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  558. Point_X3.x=MidPoint.x-X;
  559. }
  560. }
  561. else
  562. {
  563. borderlen=fabs(MidPoint.x-Point_X2.x);
  564. SaveAngle=borderlen/length*2;             
  565. if((Point_X2.y>Point_X1.y)&&(Point_X2.x<Point_X1.x))
  566. {
  567. Point_X3.y=MidPoint.y+(hight*SaveAngle);
  568. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  569. Point_X3.x=MidPoint.x-X;
  570. }
  571. else if((Point_X2.y>Point_X1.y)&&(Point_X2.x>Point_X1.x))
  572. {
  573. Point_X3.y=MidPoint.y-(hight*SaveAngle);
  574. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  575. Point_X3.x=MidPoint.x-X;
  576. }
  577. else if((Point_X2.y<Point_X1.y)&&(Point_X2.x>Point_X1.x))
  578. {
  579. Point_X3.y=MidPoint.y-(hight*SaveAngle);
  580. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  581. Point_X3.x=MidPoint.x+X;
  582. }
  583. else if((Point_X2.y<Point_X1.y)&&(Point_X2.x<Point_X1.x))
  584. {
  585. Point_X3.y=(MidPoint.y+(hight*SaveAngle));
  586. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  587. Point_X3.x=MidPoint.x+X;
  588. }
  589. }
  590. }
  591. calculate_path_line(path,Point_X1.x,Point_X1.y,Point_X3.x,Point_X3.y);
  592. calculate_path_line(path,Point_X2.x,Point_X2.y,Point_X3.x,Point_X3.y);
  593. calculate_path_line(path,Point_X1.x,Point_X1.y,Point_X2.x,Point_X2.y);
  594. */
  595. calculate_Get_CIRCLE(*pCircle,bugle,KmPoint(x1,y1),KmPoint(x2,y2));
  596. calculate_path_object(path,pCircle);
  597. delete pCircle;
  598. }
  600. void CReader::calculate_Get_CIRCLE(CIRCLE &rCircle,double bugle,KmPoint Point_X1,KmPoint Point_X2)
  601. {
  602. KmPoint Point_X3;        //存放圆上的第三点
  603. KmPoint ChangPoint;
  604. KmPoint MidPoint;        //弦Point_X1Point_X2上的中点
  605. double   length  ;        //Point_X1，Point_X2之间线段长度
  606. double   hight;           //弦Point_X1Point_X2上的高
  607. double   borderlen;
  608. double   SaveAngle;       //与弧相关角的SIN或COS值
  609. double   X;
  610.  
  611. length=sqrt((Point_X1.x-Point_X2.x)*(Point_X1.x-Point_X2.x)+(Point_X1.y-Point_X2.y)*(Point_X1.y-Point_X2.y));
  612. hight=(length*bugle)/2;
  613.     MidPoint.x=(Point_X1.x+Point_X2.x)/2;
  614.     MidPoint.y=(Point_X1.y+Point_X2.y)/2;
  615. if((Point_X1.y==MidPoint.y)&&(Point_X1.x>MidPoint.x))//当弦与X轴平行且弧向上弯曲
  616. {
  617. Point_X3.y=MidPoint.y+hight;
  618. Point_X3.x=MidPoint.x;
  619. }
  620. else if((Point_X1.y==MidPoint.y)&&(Point_X1.x<MidPoint.x))//当弦与X轴平行且弧向下弯曲
  621. {
  622. Point_X3.y=MidPoint.y-hight;
  623. Point_X3.x=MidPoint.x;
  624. }
  625. else if((Point_X1.x==MidPoint.x)&&(Point_X1.y<MidPoint.y))//当弦与Y轴平行且弧向右弯曲
  626. {
  627. Point_X3.x=MidPoint.x+hight;
  628. Point_X3.y=MidPoint.y;
  629. }
  631. else if((Point_X1.x==MidPoint.x)&&(Point_X1.y>MidPoint.y))//当弦与Y轴平行且弧向左弯曲
  632. {
  633. Point_X3.x=MidPoint.x-hight;
  634. Point_X3.y=MidPoint.y;
  635. }
  636. else
  637. {
  638. if(bugle>0)  //弧为逆时针方向
  639. {
  640. borderlen=fabs(MidPoint.x-Point_X2.x);
  641. SaveAngle=borderlen/length*2;             
  642. if((Point_X2.y>Point_X1.y)&&(Point_X2.x<Point_X1.x))
  643. {
  644. Point_X3.y=MidPoint.y+(hight*SaveAngle);
  645. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  646. Point_X3.x=MidPoint.x+X;
  647. }
  648. else if((Point_X2.y>Point_X1.y)&&(Point_X2.x>Point_X1.x))
  649. {
  650. Point_X3.y=MidPoint.y-(hight*SaveAngle);
  651. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  652. Point_X3.x=MidPoint.x+X;
  653. }
  654. else if((Point_X2.y<Point_X1.y)&&(Point_X2.x>Point_X1.x))
  655. {
  656. Point_X3.y=MidPoint.y-(hight*SaveAngle);
  657. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  658. Point_X3.x=MidPoint.x-X;
  659. }
  660. else if((Point_X2.y<Point_X1.y)&&(Point_X2.x<Point_X1.x))
  661. {
  662. Point_X3.y=(MidPoint.y+(hight*SaveAngle));
  663. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  664. Point_X3.x=MidPoint.x-X;
  665. }
  666. }
  667. else
  668. {
  669. borderlen=fabs(MidPoint.x-Point_X2.x);
  670. SaveAngle=borderlen/length*2;             
  671. if((Point_X2.y>Point_X1.y)&&(Point_X2.x<Point_X1.x))
  672. {
  673. Point_X3.y=MidPoint.y+(hight*SaveAngle);
  674. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  675. Point_X3.x=MidPoint.x-X;
  676. }
  677. else if((Point_X2.y>Point_X1.y)&&(Point_X2.x>Point_X1.x))
  678. {
  679. Point_X3.y=MidPoint.y-(hight*SaveAngle);
  680. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  681. Point_X3.x=MidPoint.x-X;
  682. }
  683. else if((Point_X2.y<Point_X1.y)&&(Point_X2.x>Point_X1.x))
  684. {
  685. Point_X3.y=MidPoint.y-(hight*SaveAngle);
  686. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  687. Point_X3.x=MidPoint.x+X;
  688. }
  689. else if((Point_X2.y<Point_X1.y)&&(Point_X2.x<Point_X1.x))
  690. {
  691. Point_X3.y=(MidPoint.y+(hight*SaveAngle));
  692. X=sqrt (fabs(hight*hight-hight*SaveAngle*hight*SaveAngle));
  693. Point_X3.x=MidPoint.x+X;
  694. }
  695. }
  696. }
  697. if(bugle>0)  //弧为逆时针方向  counter-clockwise
  698. {
  699. calculate_three_point_Getcircle(rCircle,Point_X3,Point_X1,Point_X2,TRUE);  //通过Point_X1,Point_X3,Point_X2求圆
  700. }
  701. else 
  702. {
  703. calculate_three_point_Getcircle(rCircle,Point_X3,Point_X1,Point_X2,FALSE);  //通过Point_X1,Point_X3,Point_X2求圆
  704. }
  705. }
  706. //KmPoint1为中点
  707. void CReader::calculate_three_point_Getcircle(CIRCLE &rCircle,KmPoint KmPoint1,KmPoint KmPoint2,KmPoint KmPoint3,BOOL bccw)
  708. {
  709.     double mid_sita;
  710.     double rxyo[3];
  711.     double sita1,sita2,s1,s2;
  713. double first_seed_x=KmPoint1.x;   
  714. double first_seed_y=KmPoint1.y;
  715. double second_seed_x=KmPoint2.x;
  716. double second_seed_y=KmPoint2.y;
  717. double third_seed_x=KmPoint3.x;
  718. double third_seed_y=KmPoint3.y;
  720. if(fabs(second_seed_y-first_seed_y)<0.0000001&&fabs(second_seed_x-first_seed_x)<0.0000001) return;
  721. if(fabs(third_seed_y-first_seed_y)<0.0000001&&fabs(third_seed_x-first_seed_x)<0.0000001) return;
  722. //计算三点圆的圆心.
  723. cal_r_xyo(rxyo,first_seed_x,first_seed_y,second_seed_x,second_seed_y,third_seed_x,third_seed_y);
  725. sita1=atan2(second_seed_y-first_seed_y,second_seed_x-first_seed_x);
  726. sita2=atan2(third_seed_y-first_seed_y,third_seed_x-first_seed_x);
  727. s1=standard(rad_to_deg(sita1));
  728. s2=standard(rad_to_deg(sita2));
  730. rCircle.xo=rxyo[1];
  731. rCircle.yo=rxyo[2];
  732. rCircle.r=rxyo[0];
  733. {//1
  734. if(fabs(first_seed_y-rxyo[2])<0.0000001&&fabs(first_seed_x-rxyo[1])<0.0000001)return;
  735. if(fabs(third_seed_y-rxyo[2])<0.0000001&&fabs(third_seed_x-rxyo[1])<0.0000001)return;
  736. if(fabs(second_seed_y-rxyo[2])<0.0000001&&fabs(second_seed_x-rxyo[1])<0.0000001)return;
  738. rCircle.b_angle=standard(rad_to_deg(atan2(second_seed_y-rxyo[2],second_seed_x-rxyo[1])));
  739. rCircle.e_angle=standard(rad_to_deg(atan2(third_seed_y-rxyo[2],third_seed_x-rxyo[1])));
  740. mid_sita=(standard(rad_to_deg(atan2(first_seed_y-rxyo[2],first_seed_x-rxyo[1]))));
  742. //if((mid_sita<rCircle.b_angle||mid_sita>rCircle.e_angle)&&rCircle.b_angle<rCircle.e_angle||mid_sita>rCircle.e_angle&&rCircle.b_angle>mid_sita)
  743. if(!bccw)
  744. {//2
  745. mid_sita=rCircle.b_angle;
  746. rCircle.b_angle=rCircle.e_angle;
  747. rCircle.e_angle=mid_sita;
  748. }//2
  749. rCircle.message=MESSAGE_CIRCLE_POSITIVE;
  750. }//1
  751. }
  753. int CReader::calculate_cal_r_xyo(double rxyo[3],double first_seed_x,double first_seed_y,double second_seed_x,double second_seed_y,double third_seed_x,double third_seed_y)
  754. //求圆//rxyo[3]圆心//second_seed_x，second_seed_y，third_seed_x，third_seed_y)//圆上的点
  755. {
  756.     if(fabs(first_seed_x-third_seed_x)>=fabs(second_seed_x-third_seed_x))
  757.     {
  758.         return(calculate_get_r_xyo(rxyo,first_seed_x,first_seed_y,second_seed_x,second_seed_y,
  759.         third_seed_x,third_seed_y));
  760.     }
  761.     else
  762.     {
  763.         return (calculate_get_r_xyo(rxyo,second_seed_x,second_seed_y,first_seed_x,first_seed_y,
  764.         third_seed_x,third_seed_y));
  765.     }
  766. }
  768. int CReader::calculate_get_r_xyo(double rxyo[3],double x1,double y1,double x2,double y2,double x3,double y3)
  769. //求圆心
  770. //rxyo[3]  出访圆新的缓存
  771. //x1,y1,x2,y2,x3,y3圆上的三点
  772. {
  773.     double circle_a1,circle_b1,circle_c1;
  774.     double m,n,k,a2,b2,c2;
  775.     double d,e,f;
  776.     circle_a1=x1*x1+y1*y1;
  777.     circle_b1=x2*x2+y2*y2;
  778.     circle_c1=x3*x3+y3*y3;
  779.     if(fabs(x1-x3)<0.0000001) return 0;
  780.     a2=(circle_a1-circle_c1)/(x1-x3);
  781.     b2=circle_b1-circle_c1;
  782.     c2=circle_c1;
  783.     m=(y1-y3)/(x1-x3);
  784.     k=y2-y3-(y1-y3)/(x1-x3)*(x2-x3);
  785.     n=y3-(y1-y3)/(x1-x3)*x3;
  786.     circle_a1=a2;
  787.     circle_b1=b2-a2*(x2-x3);
  788.     circle_c1=c2-x3*a2;
  789.     if(fabs(k)<0.0000001) return 0;
  790.     d=-circle_a1+circle_b1/k*m;
  791.     e=-circle_b1/k;
  792.     f=-circle_c1+circle_b1/k*n;
  793.     rxyo[0]=sqrt(d*d+e*e-4.0*f)*0.5;
  794.     rxyo[1]=-d*0.5;
  795.     rxyo[2]=-e*0.5;
  796.     return 1;
  797. }
  799. BOOL CReader::calculate_findshape(AD_DB_HANDLE dwghandle,AD_OBJHANDLE shapefileobjhandle,int whichshape,double *px,double *py,double dAng,int bound_high,double text_h, double text_w,KmBuffer* pBuffer)
  800. {
  801. AD_TB adtbtemp;
  802. //extern  short  ADCDECL adSeekShapefile _((AD_DB_HANDLE handle,AD_OBJHANDLE thehandle,PAD_SHPTB theshptb));
  803. short sReturnValue = adSeekShapefile(dwghandle,shapefileobjhandle,&adtbtemp.shptb);
  804. if(sReturnValue!=1)
  805. {
  806. return FALSE;
  807. }
  808. CString filename=adtbtemp.shptb.file;
  809. if(filename.IsEmpty()){return FALSE;}
  810. CFileFind filefind;
  811. if(!filefind.FindFile(filename))
  812. {
  813. calculate_DefaultExamineFile(filename,"SUPPORT");
  814. {
  815. TCHAR szFileName[MAX_PATH]; 
  816. ::GetModuleFileName(::GetModuleHandle(_T("FileSwitch.dll")),szFileName,MAX_PATH); 
  817. (*_tcsrchr(szFileName,'\'))=''; 
  818. CString strPath=szFileName;
  819. strPath+="\";
  820. strPath+="SUPPORT";
  821. strPath+="\";
  822. strPath+=filename;
  823. if(!filefind.FindFile(strPath))
  824. {
  825. filefind.Close();
  826. return FALSE;
  827. }
  828. filename=strPath;
  829. }
  830. }
  831. //BYTE24 CHAR* 文件格式标记
  832. //BYTE2 int 形的起始序号
  833. //BYTE2 int 形的中止序号
  834. //BYTE2 int 形的数量
  835. //循环BYTE2 int 形的序号
  836. //   BYTE2 int 形的字节长度
  837. //循环BYTE至0 CHAR* 形的名称
  838. //   BYTE形的长度shorts形的内容
  839. //BYTE3 CHAR* 结束标记"EOF"
  840. CFile file;
  841. if(!file.Open(filename,CFile::modeRead))
  842. {
  843. return FALSE;
  844. } 
  845. __int8  byte;
  846. __int16 data;
  847. __int16 iBegin;
  848. __int16 iEnd;
  849. __int16 iNum;
  850. CArray<__int16,__int16> iLengths;
  851. if(file.Seek(24,CFile::begin)!=24){try{file.Close();}catch(...){};return FALSE;}
  852. if(file.Read(&data,2)!=2){try{file.Close();}catch(...){};return FALSE;}iBegin=data;
  853. if(file.Read(&data,2)!=2){try{file.Close();}catch(...){};return FALSE;}iEnd=data;
  854. if(file.Read(&data,2)!=2){try{file.Close();}catch(...){};return FALSE;}iNum=data;
  855. if(iNum!=(fabs(iEnd-iBegin)+1)){try{file.Close();}catch(...){};return FALSE;}
  856. if(iEnd<iBegin){data=iBegin;iBegin=iEnd;iEnd=data;}
  857. if(whichshape<iBegin||whichshape>iEnd){try{file.Close();}catch(...){};return FALSE;}
  858. for(__int16 index=iBegin;index<=iEnd;index++)
  859. {
  860. if(file.Read(&data,2)!=2){try{file.Close();}catch(...){};return FALSE;}
  861. if(index!=data){try{file.Close();}catch(...){};return FALSE;}
  862. if(file.Read(&data,2)!=2){try{file.Close();}catch(...){};return FALSE;}
  863. iLengths.Add(data);
  864. }
  865. if(iLengths[whichshape-iBegin]>2000){try{file.Close();}catch(...){};return FALSE;}
  866. __int32 iPos=30+iNum*4;
  867. for(index=0;index<(whichshape-iBegin);index++)
  868. {
  869. iPos+=iLengths[index];
  870. }
  871. if(file.Seek(iPos,CFile::begin)!=iPos){try{file.Close();}catch(...){};return FALSE;}
  872. CString strShapeName;
  873. for(index=0;index<25;index++)
  874. {
  875. if(file.Read(&byte,1)!=1){try{file.Close();}catch(...){};return FALSE;}
  876. if(byte==0)break;
  877. strShapeName+=byte;
  878. if(index==24){try{file.Close();}catch(...){};return FALSE;}
  879. }
  880. char str[2000];
  881. if( file.Read(str,iLengths[whichshape-iBegin]-strShapeName.GetLength()-1)!=((UINT)(iLengths[whichshape-iBegin]-strShapeName.GetLength()-1))){try{file.Close();}catch(...){};return FALSE;}
  882. file.Close();
  883. CreateShape(dwghandle,shapefileobjhandle,str,iLengths[whichshape-iBegin]-strShapeName.GetLength()-1,px,py,dAng,bound_high,text_h,text_w,pBuffer);
  884. filefind.Close();
  885. return TRUE;
  886. }
  888. double calculate_findTTFHightRate(CString strFontName)
  889. {
  890. FONTMAPITEM* pFontMapItem=NULL;
  891. if(CConverter::m_mapFont.Lookup(strFontName,(void* &)pFontMapItem))
  892. {
  893. strFontName=pFontMapItem->m_strFontName;
  894. }
  895. double dRate=1.0;
  896. if(strFontName.Find('.')!=-1)return dRate;
  897. CWinApp* pApp=::AfxGetApp();
  898. CString strTemp;
  899. if(pApp)
  900. {
  901. strTemp = pApp->GetProfileString(_T("DwgFontHightRate"),strFontName,"-1.0");
  902. dRate = ::atof(LPCTSTR(strTemp));
  903. if(dRate>0)
  904. {
  905. return dRate;
  906. }
  907. }
  908. dRate=1.0;
  909. CFont fonttext;fonttext.CreateFont(1000,0,0,0,0,FALSE,FALSE,0,DEFAULT_CHARSET,0,0,0,0,strFontName);
  910. CWnd* pDesktop=CWnd::FromHandle(::GetDesktopWindow());
  911. CDC* pDC=pDesktop->GetDC();
  912. CFont* fontold=pDC->SelectObject(&fonttext);
  913. TEXTMETRIC tm;
  914. pDC->GetTextMetrics(&tm);
  915. pDC->SelectObject(fontold);
  916. if(fonttext.GetSafeHandle())
  917. fonttext.DeleteObject();
  918. try
  919. {
  920. dRate= ((double)(tm.tmHeight-tm.tmInternalLeading))*((double)(tm.tmAscent-tm.tmInternalLeading))/( ((double)(tm.tmHeight-tm.tmInternalLeading))*TEXT_ADJUST*((double)(tm.tmHeight+tm.tmExternalLeading)) );
  921. }
  922. catch(...)
  923. {
  924. dRate=1.0;
  925. }
  926. strTemp.Format("%lf",dRate);
  927. pApp->WriteProfileString(_T("DwgFontHightRate"),strFontName, strTemp);//用于保证保存了数据
  928. return dRate;
  929. }
  931. double calculate_findTTFWidthRate(CString strFontName)
  932. {
  933. FONTMAPITEM* pFontMapItem=NULL;
  934. if(CConverter::m_mapFont.Lookup(strFontName,(void* &)pFontMapItem))
  935. {
  936. strFontName=pFontMapItem->m_strFontName;
  937. }
  938. double dRate=1.0;
  939. if(strFontName.Find('.')!=-1)return dRate;
  940. CWinApp* pApp=::AfxGetApp();
  941. CString strTemp;
  942. if(pApp)
  943. {
  944. strTemp = pApp->GetProfileString(_T("DwgFontWidthRate"),strFontName,"-1.0");
  945. dRate = ::atof(LPCTSTR(strTemp));
  946. if(dRate>0)
  947. {
  948. return dRate;
  949. }
  950. }
  951. dRate=1.0;
  952. CFont fonttext;fonttext.CreateFont(1000,0,0,0,0,FALSE,FALSE,0,DEFAULT_CHARSET,0,0,0,0,strFontName);
  953. CWnd* pDesktop=CWnd::FromHandle(::GetDesktopWindow());
  954. CDC* pDC=pDesktop->GetDC();
  955. CFont* fontold=pDC->SelectObject(&fonttext);
  956. TEXTMETRIC tm;
  957. pDC->GetTextMetrics(&tm);
  958. pDC->SelectObject(fontold);
  959. if(fonttext.GetSafeHandle())
  960. fonttext.DeleteObject();
  961. try
  962. {
  963. dRate=((double)tm.tmAveCharWidth)/((double)tm.tmHeight)*2.0;
  964. }
  965. catch(...)
  966. {
  967. dRate=1.0;
  968. }
  969. strTemp.Format("%lf",dRate);
  970. pApp->WriteProfileString(_T("DwgFontWidthRate"),strFontName, strTemp);//用于保证保存了数据
  971. return dRate;
  972. }
  974. double calculate_findTTFPosRate(CString strFontName)
  975. {
  976. FONTMAPITEM* pFontMapItem=NULL;
  977. if(CConverter::m_mapFont.Lookup(strFontName,(void* &)pFontMapItem))
  978. {
  979. strFontName=pFontMapItem->m_strFontName;
  980. }
  981. double dRate=1.0;
  982. if(strFontName.Find('.')!=-1)return dRate;
  983. CWinApp* pApp=::AfxGetApp();
  984. CString strTemp;
  985. if(pApp)
  986. {
  987. strTemp = pApp->GetProfileString(_T("DwgFontPosRate"),strFontName,"-1.0");
  988. dRate = ::atof(LPCTSTR(strTemp));
  989. if(dRate>0)
  990. {
  991. return dRate;
  992. }
  993. }
  994. dRate=1.0;
  995. CFont fonttext;fonttext.CreateFont(1000,0,0,0,0,FALSE,FALSE,0,DEFAULT_CHARSET,0,0,0,0,strFontName);
  996. CWnd* pDesktop=CWnd::FromHandle(::GetDesktopWindow());
  997. CDC* pDC=pDesktop->GetDC();
  998. CFont* fontold=pDC->SelectObject(&fonttext);
  999. TEXTMETRIC tm;
  1000. pDC->GetTextMetrics(&tm);
  1001. pDC->SelectObject(fontold);
  1002. if(fonttext.GetSafeHandle())
  1003. fonttext.DeleteObject();
  1004. try
  1005. {
  1006. //a=1.0+字高调整系数*TEXT_ADJUST*(扩展+发音)/(字高-线下-发音)
  1007. dRate=1.0+::calculate_findTTFHightRate(strFontName)*TEXT_ADJUST*(tm.tmExternalLeading+
  1008. tm.tmInternalLeading)/(1000.0-tm.tmDescent-tm.tmInternalLeading);
  1009. }
  1010. catch(...)
  1011. {
  1012. dRate=1.0;
  1013. }
  1014. strTemp.Format("%lf",dRate);
  1015. pApp->WriteProfileString(_T("DwgFontPosRate"),strFontName, strTemp);//用于保证保存了数据
  1016. return dRate;
  1017. }
  1019. BOOL CALLBACK AFX_EXPORT CReader::EnumFamScreenCallBack(ENUMLOGFONT* pelf, 
  1020. NEWTEXTMETRICEX* /*lpntm*/, int FontType, LPVOID lp)
  1021. {
  1022. if (FontType & RASTER_FONTTYPE)
  1023. return 1;
  1025. LOGFONT& lf = pelf->elfLogFont;
  1027. if ((lf.lfCharSet != ANSI_CHARSET) 
  1028. &&(lf.lfCharSet != OEM_CHARSET) 
  1029. &&(lf.lfCharSet != SYMBOL_CHARSET) 
  1030. &&(lf.lfCharSet != GB2312_CHARSET) )
  1031. return 1 ;
  1032. // CStringArray* strarray;
  1033. // strarray = (CStringArray*)lp;
  1034. // strarray->Add(lf.lfFaceName);
  1035. CString strfilename;
  1036. strfilename=lf.lfFaceName;
  1037. // strfilename.MakeLower();
  1038. CTypedPtrMap<CMapStringToPtr, CString, void*>* pMapFont = 
  1039.   (CTypedPtrMap<CMapStringToPtr, CString, void*>*)lp;
  1040. void *p;
  1041. if(!pMapFont->Lookup(strfilename,p))
  1042. {
  1043. CString strTemp=strfilename;
  1044. strTemp.MakeLower();
  1045. if(strTemp=="symusic"||
  1046.    strTemp=="romand"||
  1047.    strTemp=="romans"||
  1048.    strTemp=="romant"||
  1049.    strTemp=="scriptc"||
  1050.    strTemp=="scripts"||
  1051.    strTemp=="syastro"||
  1052.    strTemp=="symap"||
  1053.    strTemp=="monotxt"||
  1054.    strTemp=="symeteo"||
  1055.    strTemp=="italict"||
  1056.    strTemp=="symath"||
  1057.    strTemp=="gothici"||
  1058.    strTemp=="bigfont"||
  1059.    strTemp=="complex"||
  1060.    strTemp=="romanc"||
  1061.    strTemp=="gothicg"||
  1062.    strTemp=="greekc"||
  1063.    strTemp=="greeks"||
  1064.    strTemp=="isocp"||
  1065.    strTemp=="isocp2"||
  1066.    strTemp=="isocp3"||
  1067.    strTemp=="isoct"||
  1068.    strTemp=="isoct2"||
  1069.    strTemp=="isoct3"||
  1070.    strTemp=="italic"||
  1071.    strTemp=="italicc"||
  1072.    strTemp=="gothice"||
  1073.    strTemp=="gbeitc"||
  1074.    strTemp=="gbcbig"||
  1075.    strTemp=="chineset"||
  1076.    strTemp=="extfont"||
  1077.    strTemp=="whgdtxt"||
  1078.    strTemp=="whgtxt"||
  1079.    strTemp=="whtmtxt"||
  1080.    strTemp=="htgtxt"||
  1081.    strTemp=="gbenor")
  1082. {
  1083. TRACE("同名 采用形文字");
  1084. }
  1085. else
  1086. {
  1087. pMapFont->SetAt(strfilename,NULL);
  1088. }
  1089. }
  1090. return 1;
  1091. }
  1093. BOOL CALLBACK AFX_EXPORT CReader::EnumFamScreenCallBackEx(ENUMLOGFONTEX* pelf, 
  1094. NEWTEXTMETRICEX* /*lpntm*/, int FontType, LPVOID lp)
  1095. {
  1096. if (FontType & RASTER_FONTTYPE)
  1097. return 1;
  1099. LOGFONT& lf = pelf->elfLogFont;
  1100. if ((lf.lfCharSet != ANSI_CHARSET) 
  1101. &&(lf.lfCharSet != OEM_CHARSET) 
  1102. &&(lf.lfCharSet != SYMBOL_CHARSET) 
  1103. &&(lf.lfCharSet != GB2312_CHARSET) )
  1104. return 1;
  1105. // CStringArray* strarray;
  1106. // strarray = (CStringArray*)lp;
  1107. // strarray->Add(lf.lfFaceName);
  1108. CString strfilename;
  1109. strfilename=lf.lfFaceName;
  1110. // strfilename.MakeLower();
  1111. CTypedPtrMap<CMapStringToPtr, CString, void*>* pMapFont = 
  1112.   (CTypedPtrMap<CMapStringToPtr, CString, void*>*)lp;
  1113. void *p;
  1114. if(!pMapFont->Lookup(strfilename,p))
  1115. {
  1116. CString strTemp=strfilename;
  1117. strTemp.MakeLower();
  1118. if(strTemp=="symusic"||
  1119.    strTemp=="romand"||
  1120.    strTemp=="romans"||
  1121.    strTemp=="romant"||
  1122.    strTemp=="scriptc"||
  1123.    strTemp=="scripts"||
  1124.    strTemp=="syastro"||
  1125.    strTemp=="symap"||
  1126.    strTemp=="monotxt"||
  1127.    strTemp=="symeteo"||
  1128.    strTemp=="italict"||
  1129.    strTemp=="symath"||
  1130.    strTemp=="gothici"||
  1131.    strTemp=="bigfont"||
  1132.    strTemp=="complex"||
  1133.    strTemp=="romanc"||
  1134.    strTemp=="gothicg"||
  1135.    strTemp=="greekc"||
  1136.    strTemp=="greeks"||
  1137.    strTemp=="isocp"||
  1138.    strTemp=="isocp2"||
  1139.    strTemp=="isocp3"||
  1140.    strTemp=="isoct"||
  1141.    strTemp=="isoct2"||
  1142.    strTemp=="isoct3"||
  1143.    strTemp=="italic"||
  1144.    strTemp=="italicc"||
  1145.    strTemp=="gothice"||
  1146.    strTemp=="gbeitc"||
  1147.    strTemp=="gbcbig"||
  1148.    strTemp=="chineset"||
  1149.    strTemp=="extfont"||
  1150.    strTemp=="whgdtxt"||
  1151.    strTemp=="whgtxt"||
  1152.    strTemp=="whtmtxt"||
  1153.    strTemp=="htgtxt"||
  1154.    strTemp=="gbenor")
  1155. {
  1156. TRACE("同名 采用形文字");
  1157. }
  1158. else
  1159. {
  1160. pMapFont->SetAt(strfilename,NULL);
  1161. }
  1162. }
  1163. return 1;
  1164. }
  1166. void CReader::calculate_findfonts(CTypedPtrMap<CMapStringToPtr, CString, void*>* pMapFont)
  1167. {
  1168. if(!pMapFont)return;
  1169. pMapFont->RemoveAll();
  1170. LOGFONT lf;
  1171. memset(&lf, 0, sizeof(LOGFONT));
  1172. lf.lfCharSet = DEFAULT_CHARSET;
  1173. CDC dcScreen;
  1174. dcScreen.Attach(::GetDC(NULL));
  1175. HDC hDC = dcScreen.m_hDC;
  1176. DWORD dwVersion = ::GetVersion();
  1177. BOOL m_bWin4 = (BYTE)dwVersion >= 4;
  1178. if (m_bWin4)
  1179. {
  1180. ::EnumFontFamiliesEx(hDC, &lf, 
  1181. (FONTENUMPROC) EnumFamScreenCallBackEx, (LPARAM)pMapFont, NULL);
  1182. }
  1183. else
  1184. {
  1185. ::EnumFontFamilies(hDC, NULL, 
  1186. (FONTENUMPROC) EnumFamScreenCallBack, (LPARAM)pMapFont);
  1187. }
  1188. }