【已解决】用户交互 时，怎么实现同时使用两个 提示选项类？

hanxu5760

请问各位大哥，在使用 用户交互 时，怎么实现同时使用两个 提示选项类？

比如使用CAD画圆的时候，在选定圆心后，程序既可以响应PromptDistanceOption 以输入半径，也可以响应PromptPointOption 以通过获取点的方式确定半径。

这是怎么实现的呢？？？

Lisphk

lisp 是 getdist

hanxu5760

Lisphk 发表于 2019-2-1 09:15
lisp 是 getdist

用C#呢？也可以实现么？因为是在用C#编一个工具栏

Lisphk

hanxu5760 发表于 2019-2-1 09:17
用C#呢？也可以实现么？因为是在用C#编一个工具栏

C#肯定也有的，你看看全局函数

hanxu5760

好，先学习下全局函数的概念再来请教吧。谢谢了~

CSharpBoy

1. PromptDoubleResult result = AcadAppServices.Application.DocumentManager.MdiActiveDocument.Editor.GetDistance("Specify distance:");
   
2. if (result.Status == PromptStatus.OK)
   
3. {
   
4.        double distance = result.Value;
   
5. }

PromptDoubleResult result = AcadAppServices.Application.DocumentManager.MdiActiveDocument.Editor.GetDistance("Specify distance:");<br /> if (result.Status == PromptStatus.OK)<br /> {<br />        double distance = result.Value;<br /> }

hanxu5760

CSharpBoy 发表于 2019-2-1 09:27

我没太明白，这段代码在获取 double 数值的同时，也可以获取点么？

我只看到了一个提示选项，没有看到获取点的提示选项.

CSharpBoy

hanxu5760 发表于 2019-2-1 10:56
我没太明白，这段代码在获取 double 数值的同时，也可以获取点么？

我只看到了一个提示选项，没有看到 ...

你的题目就是说 可以通过输入点，来获取半径（实数），也可以通过输入数值来获取半径，怎么又问拾取点了。

你在提示下，鼠标点取点，就返回半径。

具体看看函数的说明，你给起始点参数，就能拉出橡皮筋提示你输入第二点确定长度，如果不给起始点参数，就会交互让你输入2个点。任何时候你都可以直接输入数值结束选点。

你可以在命令行试试LISP同功能的函数理解下

1、(getdist "\n输入半径或取点:")
2、(getdist (getpoint "\n第一点:") "\n第二点或输入数值:")

newer

hanxu5760 发表于 2019-2-1 10:56
我没太明白，这段代码在获取 double 数值的同时，也可以获取点么？

我只看到了一个提示选项，没有看到 ...

GETDISTANCE有两种方法
GetDistance

Autodesk.AutoCAD.EditorInput.PromptDoubleResult

GetDistance(

Autodesk.AutoCAD.EditorInput.PromptDistanceOptions options)

Parameters

options

Input Autodesk.AutoCAD.EditorInput.PromptDistanceOptions object. Optional parameters of the prompt.

Return TypeAutodesk.AutoCAD.EditorInput.PromptDoubleResult

Wrapper.
acedInitGet,acedGetDist.

---

GetDistance

Autodesk.AutoCAD.EditorInput.PromptDoubleResult

GetDistance(

System.String message)

Parameters

message

Input System.String object. Message to be displayed to the user during the prompt.

Return TypeAutodesk.AutoCAD.EditorInput.PromptDoubleResult

Wraps the following functions:
acedGetDist
Returns a PromptResult object representing the result of the prompt operation.

hanxu5760

CSharpBoy 发表于 2019-2-1 11:25
你的题目就是说 可以通过输入点，来获取半径（实数），也可以通过输入数值来获取半径，怎么又问拾取点了 ...

感谢指点，已搞定~~~

hanxu5760

自己编的代码，供大家参考

1. using Autodesk.AutoCAD.Runtime;
   
2. using Autodesk.AutoCAD.DatabaseServices;
   
3. using Autodesk.AutoCAD.ApplicationServices;
   
4. using Autodesk.AutoCAD.Geometry;
   
5. using Autodesk.AutoCAD.EditorInput;
   
6. 
   
7. namespace Code
   
8. {
   
9.     public class Test
   
10.     {
    
11.         [CommandMethod("ETN")]
    
12.         public void ET_Test()
    
13.         {
    
14.             Database db = HostApplicationServices.WorkingDatabase;
    
15.             Editor ed=Application.DocumentManager.MdiActiveDocument.Editor;
    
16. 
    
17.             Point3d cenPt = new Point3d();
    
18.             Vector3d vec = Vector3d.ZAxis;
    
19.             double Radius = 0;
    
20. 
    
21.             PromptPointOptions optCenPt = new PromptPointOptions("\n获取基点");
    
22.             PromptPointResult resCenPt = ed.GetPoint(optCenPt);
    
23. 
    
24.             if (resCenPt.Status == PromptStatus.OK)
    
25.             {
    
26.                 cenPt = resCenPt.Value;
    
27.             }
    
28. 
    
29. 
    
30.             PromptDistanceOptions optRadius = new PromptDistanceOptions("\n获取半径");
    
31.             optRadius.BasePoint = cenPt;
    
32.             optRadius.UseBasePoint = true;
    
33. 
    
34.             PromptDoubleResult resRadius = ed.GetDistance(optRadius);
    
35. 
    
36.             if (resRadius.Status == PromptStatus.OK)
    
37.             {
    
38.                 Radius = resRadius.Value;
    
39.             }
    
40. 
    
41.             using (Transaction trans = db.TransactionManager.StartTransaction())
    
42.             {
    
43.                 Circle cir = new Circle(cenPt, vec, Radius);
    
44. 
    
45.                 db.AddToModelSpace(cir);
    
46. 
    
47.                 trans.Commit();
    
48.             }
    
49.         }
    
50.     }
    
51. }

using Autodesk.AutoCAD.Runtime;<br /> using Autodesk.AutoCAD.DatabaseServices;<br /> using Autodesk.AutoCAD.ApplicationServices;<br /> using Autodesk.AutoCAD.Geometry;<br /> using Autodesk.AutoCAD.EditorInput;<br /> <br /> namespace Code<br /> {<br />     public class Test<br />     {<br />         [CommandMethod("ETN")]<br />         public void ET_Test()<br />         {<br />             Database db = HostApplicationServices.WorkingDatabase;<br />             Editor ed=Application.DocumentManager.MdiActiveDocument.Editor;<br /> <br />             Point3d cenPt = new Point3d();<br />             Vector3d vec = Vector3d.ZAxis;<br />             double Radius = 0;<br /> <br />             PromptPointOptions optCenPt = new PromptPointOptions("\n获取基点");<br />             PromptPointResult resCenPt = ed.GetPoint(optCenPt);<br /> <br />             if (resCenPt.Status == PromptStatus.OK)<br />             {<br />                 cenPt = resCenPt.Value;<br />             }<br /> <br /> <br />             PromptDistanceOptions optRadius = new PromptDistanceOptions("\n获取半径");<br />             optRadius.BasePoint = cenPt;<br />             optRadius.UseBasePoint = true;<br /> <br />             PromptDoubleResult resRadius = ed.GetDistance(optRadius);<br /> <br />             if (resRadius.Status == PromptStatus.OK)<br />             {<br />                 Radius = resRadius.Value;<br />             }<br /> <br />             using (Transaction trans = db.TransactionManager.StartTransaction())<br />             {<br />                 Circle cir = new Circle(cenPt, vec, Radius);<br /> <br />                 db.AddToModelSpace(cir);<br /> <br />                 trans.Commit();<br />             }<br />         }<br />     }<br /> }

newer

hanxu5760 发表于 2019-2-1 12:52
自己编的代码，供大家参考

using Autodesk.AutoCAD.Runtime;

解决了，请编辑下主题，前面加上【已解决】。