[日积月累]：Arx函数集，网友自制

nyfgp

多点vba的就好了。

hyk123

谢谢!!

magyar

谁知道ARX怎么对两个面进行判断求。。

lizl

多多学习，谢谢！

xiaomi

AcGePlane
CRegionGraph::getUcsPlane(AcDbDatabase* db)
{
        ASSERT(db != NULL);

    AcGeMatrix3d m;

        if (acdbUcsMatrix(m, db)) {
                AcGePoint3d origin;
                AcGeVector3d xDir, yDir, zDir;

                m.getCoordSystem(origin, xDir, yDir, zDir);
                AcGePlane ucsPlane(origin, xDir, yDir);
                return ucsPlane;
        }
        else {
                ASSERT(0);
        AcGePlane ucsPlane(AcGePoint3d::kOrigin, AcGeVector3d::kIdentity);
        return ucsPlane;
        }
}

//*****************************
AcGeVector3d
CRegionGraph::getUcsXAxis(AcDbDatabase* db)
{
        ASSERT(db != NULL);

    AcGeMatrix3d m;

        if (acdbUcsMatrix(m, db)) {
                AcGePoint3d origin;
                AcGeVector3d xDir, yDir, zDir;

                m.getCoordSystem(origin, xDir, yDir, zDir);
                return xDir;
        }
        else {
                ASSERT(0);
                return AcGeVector3d::kXAxis;
        }
}

/****************************************************************************
**
**        CRegionGraph::getUcsYAxis
**                returns current UCS Y Axis, even if currently the paperSpace viewport
**
**        **jma
*/
//*************************************/

AcGeVector3d
CRegionGraph::getUcsYAxis(AcDbDatabase* db)
{
        ASSERT(db != NULL);

    AcGeMatrix3d m;

        if (acdbUcsMatrix(m, db)) {
                AcGePoint3d origin;
                AcGeVector3d xDir, yDir, zDir;

                m.getCoordSystem(origin, xDir, yDir, zDir);
                return yDir;
        }
        else {
                ASSERT(0);
                return AcGeVector3d::kYAxis;
        }
}

/****************************************************************************
**
**        CRegionGraph::getUcsZAxis
**
**        **jma
**
*************************************/

AcGeVector3d
CRegionGraph::getUcsZAxis(AcDbDatabase* db)
{
        ASSERT(db != NULL);

    AcGeMatrix3d m;

        if (acdbUcsMatrix(m, db)) {
                AcGePoint3d origin;
                AcGeVector3d xDir, yDir, zDir;

                m.getCoordSystem(origin, xDir, yDir, zDir);
                return zDir;
        }
        else {
                ASSERT(0);
                return AcGeVector3d::kZAxis;
        }
}

jx_lgq

//指定两点Pnt3d1,Pnt3d2,查询Pnt3d3是否在由前两点组成的线的左边,坐标被投影成二维
BOOL CCommonHanlder::QueryPntIsOnLineLeft(AcGePoint3d Pnt3d1,AcGePoint3d Pnt3d2,AcGePoint3d Pnt3d3)
{
        AcGePlane plane;
        AcGePoint2d Pnt1,Pnt2,Pnt3;
        Pnt1=Pnt3d1.convert2d(plane);
        Pnt2=Pnt3d2.convert2d(plane);
        Pnt3=Pnt3d3.convert2d(plane);
        AcGeVector2d vec1,vec2;
        AcGeLineSeg2d lin1,lin2;
        lin1.set(Pnt2,Pnt1);
        vec1=lin1.direction();
        lin2.set(Pnt1,Pnt3);
        vec2=lin2.direction();
        if(sin(vec1.angle()-vec2.angle())>0)
                return FALSE;
        else
                return TRUE;
}

yaoyi

学习中

vivishelley

AcDbObjectId copy(AcDbObjectId ID)
{
        AcDbEntity *pObj;
        acdbOpenAcDbEntity(pObj,ID,AcDb::kForRead);
        AcDbEntity* pClone=AcDbEntity::cast(pObj->clone());
        AcDbObjectId entityId=AddEntityToDbs(pClone);
        pClone->close();
        pObj->close();
        return entityId;
}

amw3

最初由 lzxlzx 发布
[B]根据射线法求交点个数，偶数－区域外，奇数－区域内
但如果射线刚好通过顶点，产生偶数，却在区域内。 [/B]

改进版

1. 
   
2.   [FONT=courier new]
   
3. //0:出错
   
4. //1:在线上;
   
5. //2:在里面;
   
6. //3在外面;
   
7. //算法:1 先看点否在pPolyline上.是返回1.
   
8. //     2 否则,过点testPt作一条射线,同时这条射线不能过pPolyline上的任何一点,
   
9. //则,求该射线与pPolyline的交点个数.
   
10. //奇数个:该点在位于内部.
    
11. //偶数个:该点在位于外部.
    
12. int  ptIsInsideClosePline( AcGePoint3d testPt,AcDbPolyline * pPolyline)
    
13. {
    
14.        
    
15.         AcGePoint3d pointOnCurve;
    
16.         pPolyline->getClosestPointTo(testPt,pointOnCurve);
    
17.         if(testPt.isEqualTo(pointOnCurve))
    
18.         {
    
19.                 pPolyline->close();
    
20.                 return 1;
    
21.         }
    
22.        
    
23.         AcDbRay Xline;
    
24.         Xline.setBasePoint(testPt);
    
25.         Xline.setUnitDir(AcGeVector3d::kXAxis);
    
26.        
    
27.         //找一个方向,使RAY不与PL上的顶点相交
    
28.         AcGeVector3dArray unitDirArr;
    
29.         for(int i=0;(unsigned int)i < pPolyline->numVerts();i++)
    
30.         {
    
31.                 AcGePoint3d pt;
    
32.                 pPolyline->getPointAt(i,pt);
    
33.                 unitDirArr.append((pt-testPt).normal());
    
34.         }
    
35.         AcGeVector3d UnitDir=AcGeVector3d::kXAxis;
    
36.         while (1)
    
37.         {
    
38.                 int foundAt;
    
39.                 if(!unitDirArr.find(UnitDir,foundAt))
    
40.                         break;
    
41.                 UnitDir.rotateBy(PI*0.03,AcGeVector3d::kZAxis);
    
42.         }
    
43.         //求交点
    
44.         AcGePoint3dArray points;
    
45.         pPolyline->intersectWith(&Xline,AcDb::kOnBothOperands,points);
    
46.         int nLen=points.length();
    
47.         if(nLen%2==0)//偶数个
    
48.         {
    
49.                 pPolyline->close();
    
50.                 return 3;
    
51.         }
    
52.         else //奇数个
    
53.         {
    
54.                 pPolyline->close();
    
55.                 return 2;
    
56.         }
    
57.         return 0;       
    
58. }
    
59. 
    
60.   [/FONT]
    

复制代码

li809

对不起,我不懂ARX,能否像lisp一样运用呢?可以换成lisp文件吗?

wxj810406

/////////////////////创建窗体图层"Window_Layer"/////////////////
AcDbObjectId
createWindowsLayer()
{
//打开层表，打开方式为只写///
AcDbLayerTable *pLayerTable;
acdbHostApplicationServices()->workingDatabase()
->getSymbolTable(pLayerTable,AcDb::kForWrite);
//初始化层表记录对象，并设定层表记录的名称“Window_Layer”

AcDbLayerTableRecord *pLayerTableRecord=new AcDbLayerTableRecord;
pLayerTableRecord->setName("Window_Layer");

        AcCmColor color;
        color.setColorIndex(1); // set color to red
        
pLayerTableRecord->setColor(color);
//层的其他属性（线型等）都用缺省值////

//将新建的层表记录添加到层表中，并将层表记录的ID保存到pLayerId作为函数的返回值////

AcDbObjectId pLayerId;
pLayerTable->add(pLayerId,pLayerTableRecord);
//关闭层表和层表记录对象///
pLayerTable->close();
pLayerTableRecord->close();

return pLayerId;
}

shuaier

好东东我下载了

ishou

最初由 amw3 发布
[B]

改进版


[CODE]
  
//0:出错... [/B]

该程序仍然存在死角： 射线与Polyline 相切情况！

ja_jerry

///*************在指定点插入指定块*******************\\\
void CTestPlate::OnBlockInsert()
{
        // TODO: Add your control notification handler code here
        acDocManager->lockDocument(curDoc());
        AcDbObjectId blockId;   //要插入的块的Id值
        AcDbBlockTable *pBlockTable;
        acdbHostApplicationServices()->workingDatabase()
                ->getSymbolTable(pBlockTable,AcDb::kForRead);
        Acad::eOk!=pBlockTable->getAt("ASDK-NO-ATTR",
                blockId,AcDb::kForRead)//根据块名获得要插入的块的ID值
        AcDbBlockReference *pBlkRef=new AcDbBlockReference;//插入块实质是插入块的引用
        pBlkRef->setBlockTableRecord(blockId);//指定所引用的图块表记录的对象ID
        resbuf to,from;
        from.restype=RTSHORT;//插入图块要进行用户坐标与世界坐标的转换
        from.resval.rint=1;//UCS
        to.restype=RTSHORT;
        to.resval.rint=0;//WCS
        AcGeVector3d normal(0.0,0.0,1.0);
        acedTrans(&(normal.x),&from,&to,Adesk::kTrue,&(normal.x));//转换函数
        AcGePoint3d basePoint(12,23,0);//指定的插入点(可以根据需要输入)
        //acedGetPoint(NULL,"\nEnter insertion point:",asDblArray(basePoint));
        pBlkRef->setPosition(basePoint);
        pBlkRef->setRotation(0.0);
        pBlkRef->setNormal(normal);
        AcDbBlockTableRecord *pBlockTableRecord;
        pBlockTable->getAt(ACDB_MODEL_SPACE,pBlockTableRecord,AcDb::kForWrite);
        pBlockTable->close();
        AcDbObjectId newEntId;
        pBlockTableRecord->appendAcDbEntity(newEntId,pBlkRef);
        pBlockTableRecord->close();
        pBlkRef->close();
        acDocManager->lockDocument(curDoc());
}

色龙

努力学习