改变多段线区直_FTOOL(膜结构设计与绘图MSDD)

admin1

功能：多改变多段线区直
FTOOL软件  由中国空间膜结构协会定制，
(膜结构设计与绘图MSDD)  Membrane structure design and drawing
需要联系作者：QQ 463017170

1. #include "StdAfx.h"
   
2. #include "StdArx.h"
   
3. #include <dbpl.h>
   
4. #include "..\..\Common\Others\ConvertUtil.h"
   
5. #include <geassign.h>
   
6. #include "..\..\Common\Entity\ArcUtil.h"
   
7. #include "..\..\Common\Document\DwgDatabaseUtil.h"
   
8. #include <afxwin.h>
   
9. #include <dbents.h>
   
10. 
    
11. 
    
12. void ZffMyProjectchangeline()
    
13. {
    
14. 
    
15. ads_name polyLinename;
    
16. ads_point pnt;
    
17. 
    
18. if (acedEntSel("\n请选择多段线的条直线段!",polyLinename,pnt)!=RTNORM)
    
19. {
    
20. return;
    
21. }
    
22. AcDbObjectId polyLineId;
    
23. acdbGetObjectId(polyLineId,polyLinename);
    
24. AcDbEntity *pEnt=NULL;
    
25. acdbOpenObject(pEnt,polyLineId,AcDb::kForWrite);
    
26. if (pEnt->isKindOf(AcDbPolyline::desc()))
    
27. {
    
28. AcDbPolyline *pPolyline=AcDbPolyline::cast(pEnt);
    
29. pEnt->close();
    
30. int vtnum=pPolyline->numVerts();
    
31. AcGePoint3dArray pts;
    
32. AcGePoint3d pt;
    
33. for(int i=0; i<vtnum; i++)
    
34. {
    
35. pPolyline->getPointAt(i, pt);
    
36. pts.append(pt);
    
37. }
    
38. AcDbVoidPtrArray curves;
    
39. pPolyline->getSplitCurves(pts,curves);
    
40. bool nRb=true;
    
41. for (i=0;i<curves.length();i++)
    
42. {
    
43. AcDbCurve *pCurve=static_cast<AcDbCurve*>(curves[i]);
    
44. if (nRb)
    
45. {
    
46. AcGeLine2d geLine;
    
47. AcGePoint3d pt1,pt2;
    
48. pCurve->getStartPoint(pt1);
    
49. pCurve->getEndPoint(pt2);
    
50. AcGePoint2d pt12d,pt22d,pnt2d,pt2d;
    
51. ads_point pt;
    
52. AcGePoint3d ptOnArc;
    
53. pt12d=CConvertUtil::ToPoint2d(pt1);
    
54. pt22d=CConvertUtil::ToPoint2d(pt2);
    
55. pnt2d=CConvertUtil::ToPoint2d(asPnt3d(pnt));
    
56. geLine.set(pt12d,pt22d);
    
57. double tol =1;
    
58. if (geLine.distanceTo(pnt2d)<tol)
    
59. {
    
60. nRb=false;
    
61. delete pCurve;
    
62. pCurve->close();
    
63. acedGetPoint(NULL,"\n输入一个点:",pt);
    
64. pt2d=CConvertUtil::ToPoint2d(asPnt3d(pt));
    
65. AcGeCircArc2d geArc(pt12d, pt2d, pt22d);
    
66. AcGePoint2d ptCenter = geArc.center();
    
67. double radius = geArc.radius();
    
68. AcGeVector2d vecStart(pt12d.x - ptCenter.x, pt12d.y - ptCenter.y);
    
69. AcGeVector2d vecEnd(pt22d.x - ptCenter.x, pt22d.y - ptCenter.y);
    
70. double startAngle = vecStart.angle();
    
71. double endAngle = vecEnd.angle();
    
72. AcDbArc *pArc=new AcDbArc(CConvertUtil::ToPoint3d(ptCenter), radius, startAngle, endAngle);
    
73. pArc->getClosestPointTo(asPnt3d(pt),ptOnArc);
    
74. 
    
75. if (CConvertUtil::ToPoint2d(ptOnArc).distanceTo(pt2d)<tol)
    
76. {
    
77. CDwgDatabaseUtil::PostToModelSpace(pArc);
    
78. }
    
79. else
    
80. {
    
81. AcDbArc *pArc2=new AcDbArc(CConvertUtil::ToPoint3d(ptCenter),radius,endAngle,startAngle);
    
82. CDwgDatabaseUtil::PostToModelSpace(pArc2);
    
83. delete pArc;
    
84. }
    
85. continue;
    
86. }
    
87. 
    
88. }
    
89. CDwgDatabaseUtil::PostToModelSpace(pCurve);
    
90. pCurve->close();
    
91. }
    
92. acdbOpenObject(pPolyline,polyLineId,AcDb::kForWrite);
    
93. pPolyline->erase();
    
94. pPolyline->close();
    
95. }
    
96. pEnt->close();
    
97. }

复制代码

jxmjg

  法拉利膜材作为一种高性能的建筑材料，在建筑、汽车及广告等多个领域有着广泛的应用。以下是对法拉利膜材型号、特点及优点的详细分析：
[img]http://www.mjgou.com/data/attachment/forum/202403/13/223041uiqmeujen4jjj6zv.jpg[/img]
[b]一、法拉利膜材型号[/b]
法拉利膜材有多种型号，包括但不限于以下几种：1302 S2 Flexlight Advanced：这是一种高性能IV型柔性复合膜材，以其卓越的透光性、耐久性和易维护性而受到青睐。942、1202 S2、1002 S2、902 S2、1212 S2、912 S2：这些型号同样属于法拉利膜材系列，各自具有不同的特性和适用范围，但具体特点需根据具体型号进一步分析。需要注意的是，法拉利膜材的型号可能随着产品更新换代而有所变化，具体型号及其特性请参考最新产品资料。
[img=860,1255]http://www.mjgou.com/data/attachment/forum/202403/13/223254bbblwlbvbvsbwlsl.jpg[/img]
[b]二、法拉利膜材特点[/b]
法拉利膜材的特点主要体现在以下几个方面：
1、高强度与耐用性：法拉利膜材采用高强度材料制成，具有良好的抗拉强度和撕裂强度，能够承受较大的外力作用而不易破损。耐用性强，能够在恶劣气候条件下保持稳定的性能，延长使用寿命。
2、透光性与美观性：部分型号如1302 S2 Flexlight Advanced具有高透光性，能够在保持室内光线充足的同时，提供清晰的视野。膜材表面平整光滑，色彩丰富多样，能够满足不同建筑和装饰需求，提升整体美观性。
3、轻质与灵活性：法拉利膜材重量较轻，便于运输和安装，能够降低施工成本和时间。膜材具有一定的柔韧性，能够适应各种复杂形状和结构的设计要求。
4、环保与可回收性：法拉利膜材符合环保要求，部分材料可回收利用，减少了对环境的影响。
[img]http://www.mjgou.com/data/attachment/forum/202403/13/223128owhn0099rrds5h5y.jpg[/img]
[b]三、法拉利膜材优点[/b]
法拉利膜材的优点主要体现在以下几个方面：
1、提升建筑性能：高强度与耐用性使得法拉利膜材能够提升建筑的稳定性和安全性，延长使用寿命。透光性与美观性使得建筑内部光线充足、视野开阔，同时提升整体美观度。
2、降低施工成本：轻质特性使得运输和安装成本降低，施工效率提高。膜材的柔韧性使得施工更加灵活多变，能够适应各种复杂地形和结构要求。
3、节能环保：部分材料可回收利用，符合环保要求，减少了对环境的影响。良好的透光性能够减少室内照明需求，降低能耗。
4、广泛应用领域：
法拉利膜材不仅适用于建筑领域（如体育设施、商业设施、文化设施、交通设施等），还广泛应用于汽车及广告领域（如高档车辆贴膜保护和装饰、广告招贴等），展现出其多功能的特性。

综上所述，法拉利膜材以其高强度、耐用性、透光性、美观性、轻质灵活性以及环保可回收性等优点，在建筑、汽车及广告等多个领域发挥着重要作用。具体型号的选择应根据实际需求和应用场景进行综合考虑。
[url=http://www.mjgou.com/forum-17-1.html][size=89167][color=Red]法拉利膜材中国代理商 - 膜结构网[/color][/size][/url]

杜肯膜中国代理

杜肯膜材，特别是德国杜肯(duraskin)膜材，是德国Verseidag-Indutex GmbH公司的核心产品，该公司位于德国的西北部城市Krefeld。以下是对杜肯膜材的详细分析：
[b]一、公司背景与实力[/b]
公司实力：杜肯(duraskin)膜材年销售金额达到7000万欧元，是目前世界上唯一一家既生产PVC类膜材又生产PTFE类膜材的公司。
技术领先：Verseidag-Indutex GmbH的涂层技术及新型功能性膜材的技术开发在世界上是数一数二的，产品品质的稳定性和技术的先进性令世界同行羡慕不已。
[b]二、产品种类与特点[/b]
PVC膜材
特点：杜肯PVC膜材表面涂层采用“不可焊接PVDF”，大大提高了膜材的自洁性和使用寿命。其最大宽幅可达到5米，是世界上最宽的PVC膜材之一。
应用：广泛用于建筑膜结构、车棚、遮阳篷等领域。
PTFE膜材
特点：PTFE膜材具有优异的自洁性、耐候性、耐腐蚀性和超长使用寿命，被称为“永久性膜材”。其最大宽幅达到4.7米，也是世界上最宽的PTFE膜材之一。
应用：特别适用于大型公共建筑、体育场馆、机场航站楼等对膜材性能要求极高的场所。
其他功能性膜材
杜肯还生产高透光膜材、吸音内膜、Low-e节能膜材、彩色膜材、纳米二氧化钛TiO2膜材等多种功能性膜材，以满足不同客户的需求。
[b]三、产品优势[/b]
品质稳定：杜肯膜材品质非常稳定，在世界各地都有众多的成功工程案例。
保险承保：杜肯膜材能获得德国多家保险公司的10年100%的产品责任保险，为客户提供额外的保障。
技术领先：杜肯膜材在涂层技术和新型功能性膜材的技术开发方面处于世界领先地位。
[b]四、市场与应用[/b]
全球市场：杜肯膜材在全球范围内拥有广泛的应用市场，特别是在欧洲、北美等地区的大型公共建筑和体育场馆项目中占据重要地位。
成功案例：杜肯膜材在斯图加特体育场、德国Halle网球中心、奥地利机场停车场、土耳其安卡拉体育场等众多知名项目中得到应用，并获得了良好的口碑。
[b]五、总结[/b]
杜肯膜材以其卓越的品质、先进的技术和广泛的应用领域在全球市场上赢得了良好的声誉。作为世界上唯一一家既生产PVC类膜材又生产PTFE类膜材的公司，杜肯膜材在膜材行业中具有举足轻重的地位。未来，随着科技的不断进步和市场的不断发展，杜肯膜材将继续保持其领先地位，为客户提供更加优质的产品和服务。