cad.net 图元动画效果+图元刷新

动图演示

实现代码

#if !HC2020
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.Geometry;
using Autodesk.AutoCAD.Runtime;
using Acap = Autodesk.AutoCAD.ApplicationServices.Application;
#else
using GrxCAD.DatabaseServices;
using GrxCAD.EditorInput;
using GrxCAD.Geometry;
using GrxCAD.Runtime;
using Acap = GrxCAD.ApplicationServices.Application;
#endif

// https://www.cnblogs.com/JJBox/p/11354224.html
namespace JoinBox;

public partial class CmdTest {
    static bool _flag = false;

    [CommandMethod(nameof(CmdTest_Animation),
         CommandFlags.Modal | CommandFlags.UsePickSet | CommandFlags.Redraw)]
    public void CmdTest_Animation() {
        _flag = !_flag;

        var dm = Acap.DocumentManager;
        var doc = dm.MdiActiveDocument;
        var db = doc.Database;
        var ed = doc.Editor;

        using var tr = new DBTans();
        using var btRec = (BlockTableRecord)tr.GetObject(db.CurrentSpaceId, OpenMode.ForWrite);

        for (int i = 0; i < 25; i++) {
            //输出到命令栏,注意一下这两种不同感觉
            var strNum = i.ToString();
            if (flag) strNum += "\n";
            else strNum += "\r";
            ed.WriteMessage(strNum);

            // 创建圆形并加入数据库
            var acCirc = new Circle(new Point3d(i, 0, 0), Vector3d.ZAxis, 0.5);
            btRec.AppendEntity(acCirc);
            tr.AddNewlyCreatedDBObject(acCirc, true);
            // 事务提交前刷新图元
            CadSystem.UpdateScreenEx(acCirc);
            // 延时100ms
            System.Threading.Thread.Sleep(100);
        }

        Transaction trans = tr;
        var tm = trans.TransactionManager;
        tm.QueueForGraphicsFlush();
        tm.FlushGraphics();
    }
}

public class CadSystem  {
    public static void UpdateScreenEx(Entity? ent = null, 
        OpenMode om = OpenMode.ForWrite) {
        if (ent is not null) {
            if (om == OpenMode.ForWrite)
                ent.UpgradeOpen();
            // 图元重绘
            ent.Draw();
            // move0要提权才有效果,不然也不报错
            ent.TransformBy(Matrix3d.Displacement(new Vector3d(0,0,0)));
            // 图块刷新
            ent.RecordGraphicsModified(true);
            if (ent is BlockReference brf) {
                // 更新动态块
                var btr = (BlockTableRecord)tr.GetObject(brf.BlockTableRecord, OpenMode.ForWrite);
                btr.UpdateAnonymousBlocks();
            }
            else if (ent is Dimension dim) dim.RecomputeDimensionBlock(true);
            else if (ent is Viewport vp) vp.UpdateDisplay(); 
        }

        // 底层差不多ed.UpdateScreen();
        Acap.UpdateScreen(); 
        // acad2014及以上要加,立即处理队列上面的消息
        System.Windows.Forms.Application.DoEvents();
    }
}
子函数

db.Action
cad.net 图元动画效果+图元刷新

动图演示

实现代码

子函数

相关阅读

公告
