ARX 曲线文字

gzxl

官方有个例子，但版本是 2008 的、而且涉及太多。

看了 Lee Mac 的代码觉得容易理解。翻译成 ARX 的。

1.         Acad::ErrorStatus es = Acad::eOk;
   
2.         // 用户选择单行文字
   
3.         ads_name nameText;
   
4.         ads_point pt;
   
5.         if (RTNORM != acedEntSel(_T("\n选择一个单行文字沿曲线排列:"), nameText, pt))
   
6.             return;
   
7.         AcDbObjectId TextID;
   
8.         es = acdbGetObjectId(TextID, nameText);
   
9.         if (es != Acad::eOk)
   
10.             return;
    
11.         AcDbEntity* pEntText = NULL;
    
12.         es = acdbOpenObject(pEntText, TextID, AcDb::kForWrite);
    
13.         if (es != Acad::eOk)
    
14.             return;
    
15.         AcDbText* pText = AcDbText::cast(pEntText);
    
16.         if (pText == NULL)
    
17.         {
    
18.             pEntText->close();
    
19.             return;
    
20.         }
    
21.         ACHAR* pTextStr = pText->textString();
    
22.         CString strText = pTextStr;
    
23.         delete[] pTextStr;
    
24.         pText->close();
    
25.         pEntText->close();
    
26.         // 用户选择曲线
    
27.         ads_name nameCurve;
    
28.         if (RTNORM != acedEntSel(_T("\n选择一条曲线:"), nameCurve, pt))
    
29.             return;
    
30.         AcDbObjectId CurveID;
    
31.         es = acdbGetObjectId(CurveID, nameCurve);
    
32.         if (es != Acad::eOk)
    
33.         {
    
34.             acutPrintf(_T("\n获取曲线 ID 失败!"));
    
35.             return;
    
36.         }
    
37.         AcDbEntity* pEntCurve = NULL;
    
38.         es = acdbOpenObject(pEntCurve, CurveID, AcDb::kForRead);
    
39.         if (es != Acad::eOk)
    
40.         {
    
41.             acutPrintf(_T("\n打开曲线失败!"));
    
42.             return;
    
43.         }
    
44.         AcDbCurve* pCurve = AcDbCurve::cast(pEntCurve);
    
45.         if (pCurve == NULL)
    
46.         {
    
47.             pEntCurve->close();
    
48.             return;
    
49.         }
    
50.         pCurve->close();
    
51.         pEntCurve->close();
    
52. 
    
53.         int nCount = 0;
    
54. 
    
55.         AcGePoint3dArray mousePoints;  // 鼠标移动-点集
    
56. 
    
57.         AcGePoint3d grrPt;
    
58.         int track = 1, type;
    
59.         struct resbuf result;
    
60.         while (track > 0)
    
61.         {
    
62.             acedGrRead(track, &type, &result);   // 追踪光标移动
    
63.             grrPt[X] = result.resval.rpoint[X];  // 获得用户输入点的位置
    
64.             grrPt[Y] = result.resval.rpoint[Y];
    
65.             int nResult = result.resval.rint;
    
66. 
    
67.             // 点从用户坐标系坐标转换到世界坐标系
    
68.             AcGePoint3d wGrrPt = UcsToWcsPoint(grrPt);
    
69. 
    
70.             if (type == 5)  // 鼠标移动
    
71.             {
    
72.                 //mousePoints.append(wGrrPt);
    
73. 
    
74.                 AcGePoint3d ptOnCurve;
    
75.                 // 获取最接近曲线上的点
    
76.                 pCurve->getClosestPointTo(wGrrPt, ptOnCurve, Adesk::kFalse);
    
77.                 // 获取角度(弧度值)
    
78.                 double dAngle = acutAngle(asDblArray(ptOnCurve), asDblArray(wGrrPt));
    
79.                 // 获取曲线起点和点之间曲线段的长度
    
80.                 double dLength;
    
81.                 pCurve->getDistAtPoint(ptOnCurve, dLength);
    
82.                 // 获取点处曲线的参数
    
83.                 double dParam;
    
84.                 pCurve->getParamAtPoint(ptOnCurve, dParam);
    
85.                 // 获取 dParam 曲线的一阶导数
    
86.                 AcGeVector3d firstDeriv;
    
87.                 pCurve->getFirstDeriv(dParam, firstDeriv);
    
88.                 // 计算两向量的夹角
    
89.                 AcGePoint3d vecPt(0.0, 0.0, 0.0);
    
90.                 AcGePoint3d vecDerivPt(firstDeriv.x, firstDeriv.y, firstDeriv.z);
    
91.                 double dDer = acutAngle(asDblArray(vecPt), asDblArray(vecDerivPt));
    
92. 
    
93.                 if ((PI * 0.5 < dDer) && (dDer <= (3.0 * PI * 0.5)))
    
94.                 {
    
95.                     std::string str(CW2A(strText.GetString()));
    
96.                     std::reverse(str.begin(), str.end());
    
97.                     strText = str.c_str();
    
98.                 }
    
99.                 int textLen = strText.GetLength();
    
100.                 if (textLen > 1)
     
101.                 {
     
102.                     dDer = GetCorrectionAngle(dDer); // 校正角度
     
103.                 }
     
104.                 dDer = GetCorrectionAngle(dDer); // 校正角度
     
105.                 double dDif = dAngle - dDer;
     
106.                 // 当前注释比例的值
     
107.                 double dTextSize;
     
108.                 GetVar(_T("textsize"), dTextSize);
     
109.                 // 文字长度
     
110.                 int nTextLen = strText.GetLength();
     
111.                 double ln = 0 - (1 + nTextLen * 0.5);
     
112.                 // 获取位于 dLength 指定位置的点
     
113.                 AcGePoint3d pt;
     
114.                 pCurve->getPointAtDist(dLength + (ln + 1) * dSpacin * dTextSize, pt);
     
115.                 ln++;
     
116. 
     
117.                 SetTextRotation(CurveID, TextID, dDif, dLength, pt);
     
118.             }
     
119. 
     
120.             if (type == 2)
     
121.             {
     
122.                 if (nResult == 46)
     
123.                 {
     
124.                     dSpacin += 0.1;
     
125.                     //acedAlert(_T("按下>键"));
     
126.                 }
     
127.                 if (nResult == 44)
     
128.                 {
     
129.                     dSpacin -= 0.1;
     
130.                     //acedAlert(_T("按下<键"));
     
131.                 }
     
132.                 if (nResult == 61)
     
133.                 {
     
134.                     dOffset += 0.1;
     
135.                     //acedAlert(_T("按下+键"));
     
136.                 }
     
137.                 if (nResult == 45)
     
138.                 {
     
139.                     dOffset -= 0.1;
     
140.                     //acedAlert(_T("按下-键"));
     
141.                 }
     
142.                 if (nResult == 32)
     
143.                 {
     
144.                     track = 0;
     
145.                     //acedAlert(_T("按下-空格键"));
     
146.                 }
     
147.                 //CString sKey;
     
148.                 //sKey.Format(_T("%d"), nResult);
     
149.                 //acedAlert(sKey);
     
150.             }
     
151. 
     
152.             if (type == 3)  // 用户按下了鼠标左键
     
153.             {
     
154.                 track = 0;
     
155.             }
     
156.         }

复制代码

1.     static void SetTextRotation(AcDbObjectId CurveID, AcDbObjectId TextID, double dDif, double dLength, const AcGePoint3d& pt)
   
2.     {
   
3.         Acad::ErrorStatus es = Acad::eOk;
   
4. 
   
5.         AcDbEntity* pEntCurve = NULL;
   
6.         es = acdbOpenObject(pEntCurve, CurveID, AcDb::kForRead);
   
7.         if (es != Acad::eOk)
   
8.             return;
   
9.         AcDbCurve* pCurve = AcDbCurve::cast(pEntCurve);
   
10.         if (pCurve == NULL)
    
11.             return;
    
12. 
    
13.         // 当前注释比例的值
    
14.         double dTextSize;
    
15.         GetVar(_T("textsize"), dTextSize);
    
16.         // 获取点处曲线的参数
    
17.         double dParam;
    
18.         pCurve->getParamAtPoint(pt, dParam);
    
19.         // 获取 dParam 曲线的一阶导数
    
20.         AcGeVector3d firstDeriv;
    
21.         pCurve->getFirstDeriv(dParam, firstDeriv);
    
22.         // 计算夹角
    
23.         AcGePoint3d vecPt(0.0, 0.0, 0.0);
    
24.         AcGePoint3d vecDerivPt(firstDeriv.x, firstDeriv.y, firstDeriv.z);
    
25.         double dDer = acutAngle(asDblArray(vecPt), asDblArray(vecDerivPt));
    
26.         double dCorrect = GetCorrectionAngle(dDer); // 校正角度
    
27.         double dDist = dDif + dDer;
    
28.         AcDbEntity* pEntText = NULL;
    
29.         es = acdbOpenObject(pEntText, TextID, AcDb::kForWrite);
    
30.         if (es != Acad::eOk) return;
    
31.         if (pEntText->isKindOf(AcDbText::desc()))
    
32.         {
    
33.             AcDbText* pText = AcDbText::cast(pEntText);
    
34. 
    
35.             pText->setHorizontalMode(TextHorzMode::kTextMid);
    
36.             pText->setVerticalMode(TextVertMode::kTextVertMid);
    
37.             AcGePoint3d AlignmentPt = PolarPoint(pt, dDist, dTextSize * dOffset);
    
38.             pText->setAlignmentPoint(AlignmentPt);
    
39.             pText->setRotation(dDer + dCorrect);
    
40.             pText->close();
    
41.         }
    
42.         pEntText->close();
    
43.         pCurve->close();
    
44.         pEntCurve->close();
    
45.     }

复制代码

你有种再说一遍

太长了不看,嘻嘻

寒潮大冬瓜

大侠改成lisp版？

gzxl

你有种再说一遍 发表于 2025-2-22 16:01
太长了不看,嘻嘻

还好啦，官方的例子，看到我两眼泪汪汪

gzxl

gzxl 发表于 2025-2-22 16:26
还好啦，官方的例子，看到我两眼泪汪汪

lisp源码就是看Lee的，还改什么？

你有种再说一遍

gzxl 发表于 2025-2-22 16:26
还好啦，官方的例子，看到我两眼泪汪汪

核心就是切线是一阶导数,也就是顺着它放文字就好了.
https://www.cnblogs.com/JJBox/p/14300098.html#_label6

yanshengjiang

虽然看不懂