天气与日历 切换到窄版

 找回密码
 立即注册
中国膜结构网
十大进口膜材评选 十大国产膜材评选 十大膜结构设计评选 十大膜结构公司评选
查看: 13|回复: 0

计算凸度

[复制链接]
  • TA的每日心情
    开心
    昨天 15:23
  • 签到天数: 69 天

    [LV.6]常住居民II

    410

    主题

    167

    回帖

    2704

    积分

    管理员

    积分
    2704
    发表于 2024-6-22 09:46:18 | 显示全部楼层 |阅读模式
    static void SplitPline(void)
    {

      AcGePoint3d p1, p2;
      if (acedGetPoint(NULL,          _T("\nPick First point on Polyline: "),  asDblArray(p1)) == RTNORM &&
          acedGetPoint(asDblArray(p1),_T("\nPick Second point on Polyline: "), asDblArray(p2)) == RTNORM)
      {
        AcGeMatrix3d matUCS; acedGetCurrentUCS(matUCS);
        p1.transformBy(matUCS); p2.transformBy(matUCS);
        ads_name en; ads_point p;
        if (acedEntSel(_T("\nSelect polyline: "), en, p) != RTNORM) return;
        AcDbObjectId eid; acdbGetObjectId(eid,en);
        AcDbObjectPointer<AcDbPolyline> pPline(eid,AcDb::kForRead);
        if (pPline.openStatus() != Acad::eOk) return;
        AcGePoint3d p1n, p2n;
        if (pPline->getClosestPointTo(p1,p1n) != Acad::eOk) return;
        if (pPline->getClosestPointTo(p2,p2n) != Acad::eOk) return;
        double par1,par2;
        if (pPline->getParamAtPoint(p1n,par1) != Acad::eOk) return;
        if (pPline->getParamAtPoint(p2n,par2) != Acad::eOk) return;
        AcGeDoubleArray pars;
        pars.append(min(par1,par2)); pars.append(max(par1,par2));
        AcDbVoidPtrArray arr;
        if (pPline->getSplitCurves(pars,arr) != Acad::eOk) return;
        for (int i = 0; i < arr.length(); i++)
        {
          AcDbEntity *pEnt = static_cast<AcDbEntity *>(arr[i]);
          AcDbPolyline *pPlineSub = AcDbPolyline::cast(pEnt);
          if (pPlineSub) {
            pPlineSub->setClosed(true);
            pPlineSub->setBulgeAt(pPlineSub->numVerts()-1,0);
          }
          postToDwgAndClose(pEnt);
        }
      }
    }

     

     

     

     

    计算凸度
    中国膜结构网打造全中国最好的膜结构综合平台 ,统一协调膜结构设计,膜结构施工,膜材采购,膜材定制,膜结构预算全方位服务。 中国空间膜结构协会合作单位。
    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    QQ|Archiver|手机版|中国膜结构网|中国膜结构协会|进口膜材|国产膜材|ETFE|PVDF|PTFE|设计|施工|安装|车棚|看台|污水池|

    GMT+8, 2024-7-1 05:28 , Processed in 0.057249 second(s), 22 queries .

    Powered by Discuz! X3.5

    © 2001-2024 Discuz! Team.

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