请教高手，在cad图面点击三点，程序自动绘制矩形框程序

mycad

请教高手，在cad图面点击三点，程序自动绘制矩形框，矩形框可以使倾斜的，哪位大师有.net源代码能否贡献一下学习，谢谢！！！

yshf

请参考gile的程序片段：http://www.theswamp.org/index.php?topic=46284.msg513392#msg513392
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.Geometry;
using Autodesk.AutoCAD.Runtime;

[assembly: CommandClass(typeof(RectangleDrawJig.CommandMethods))]

namespace RectangleDrawJig
{
    public class CommandMethods
    {
        [CommandMethod("Test", CommandFlags.Modal)]
        public void Test()
        {
            Document doc = Application.DocumentManager.MdiActiveDocument;
            Database db = doc.Database;
            Editor ed = doc.Editor;

            PromptPointResult ppr = ed.GetPoint("\nSpecify the first corner: ");
            if (ppr.Status != PromptStatus.OK) return;
            Matrix3d ucs = ed.CurrentUserCoordinateSystem;
            Point3d basePt = ppr.Value;
            using (Transaction tr = db.TransactionManager.StartTransaction())
            using(Line line = new Line(basePt, basePt))
            using(Polyline pline = new Polyline(4))
            {
                Point2d basePt2d = new Point2d(basePt.X, basePt.Y);
                pline.AddVertexAt(0, basePt2d, 0.0, 0.0, 0.0);
                pline.AddVertexAt(1, basePt2d, 0.0, 0.0, 0.0);
                pline.AddVertexAt(2, basePt2d, 0.0, 0.0, 0.0);
                pline.AddVertexAt(3, basePt2d, 0.0, 0.0, 0.0);
                pline.Closed = true;
                RectangleJig jig = new RectangleJig(pline, line, ucs);
                PromptResult pr = ed.Drag(jig);
                if (pr.Status == PromptStatus.OK)
                {
                    BlockTableRecord btr =
                        (BlockTableRecord)tr.GetObject(db.CurrentSpaceId, OpenMode.ForWrite);
                    pline.TransformBy(ucs);
                    btr.AppendEntity(pline);
                    tr.AddNewlyCreatedDBObject(pline, true);
                    line.TransformBy(ucs);
                    btr.AppendEntity(line);
                    tr.AddNewlyCreatedDBObject(line, true);
                }
                tr.Commit();
            }
        }

        class RectangleJig : DrawJig
        {
            private Polyline pline;
            private Line line;
            private Matrix3d ucs2wcs, wcs2ucs;
            private Point3d dragPt;
            private Point2d basePt;

            public RectangleJig(Polyline pline, Line line, Matrix3d ucs)
            {
                this.pline = pline;
                this.line = line;
                this.ucs2wcs = ucs;
                this.wcs2ucs = ucs.Inverse();
                this.dragPt = line.EndPoint;
                this.basePt = pline.GetPoint2dAt(0);
            }

            protected override bool WorldDraw(Autodesk.AutoCAD.GraphicsInterface.WorldDraw draw)
            {
                Autodesk.AutoCAD.GraphicsInterface.WorldGeometry geo = draw.Geometry;
                if (geo != null)
                {
                    geo.PushModelTransform(ucs2wcs);
                    geo.Draw(line);
                    geo.Draw(pline);
                    geo.PopModelTransform();
                }
                return true;
            }

            protected override SamplerStatus Sampler(JigPrompts prompts)
            {
                PromptPointResult ppr = prompts.AcquirePoint("\nSpecify the opposite corner: ");
                if (ppr.Value.IsEqualTo(dragPt))
                    return SamplerStatus.NoChange;
                dragPt = ppr.Value;
                Update();
                return SamplerStatus.OK;
            }

            private void Update()
            {
                Point3d pt = dragPt.TransformBy(wcs2ucs);
                line.EndPoint = pt;
                pline.SetPointAt(1, new Point2d(pt.X, basePt.Y));
                pline.SetPointAt(2, new Point2d(pt.X, pt.Y));
                pline.SetPointAt(3, new Point2d(basePt.X, pt.Y));
            }
        }

    }
}

Leo1980

关键字，jig，两点距离，向量，坐标转换

satan421

三点是任意三点吗？如果这三点是角点，不一定能构成矩形吧，如果不是角点，那能绘制的矩形不唯一

Leo1980

satan421 发表于 2019-9-5 10:21
三点是任意三点吗？如果这三点是角点，不一定能构成矩形吧，如果不是角点，那能绘制的矩形不唯一

点的先后顺序可以确定向量，下面是solidworks的

mycad

@Leo1980,是这个意思

mycad

是的

cairunbin

这个问题也有人回答，真狠惊奇。

懸懸懸

楼主的代码实现了吗

sfmw

mycad 发表于 2020-3-20 17:42
是的

能发上来，共享一下吗