找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 1566|回复: 0

[分享] Setting/Creating a named View with associated UCS

[复制链接]

已领礼包: 859个

财富等级: 财运亨通

发表于 2014-6-10 23:51:40 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
Setting/Creating a named View with associated UCSBy Philippe Leefsma
The following C# command will set an existing named view with associated UCS if it exists or create a new one and set it to the drawing extents:
[CommandMethod("SetNamedView"
public void SetNamedView()
{
    Document doc = Application.DocumentManager.MdiActiveDocument;
    Database db = doc.Database;
    Editor ed = doc.Editor;
    PromptStringOptions pso = new PromptStringOptions("\nEnter view name: ");
    pso.AllowSpaces = true;
            
    PromptResult pr = ed.GetString(pso);
    if(pr.Status != PromptStatus.OK)
        return;
    using(Transaction Tx = db.TransactionManager.StartTransaction())
    {
        ViewTable vt = Tx.GetObject(db.ViewTableId, OpenMode.ForRead)
            as ViewTable;
        if(!vt.Has(pr.StringResult))
        {
            PromptKeywordOptions pko = new PromptKeywordOptions(
                "\nView does not exist, do you want to create it?");
            pko.AllowNone = false;
            pko.Keywords.Add("Yes");
            pko.Keywords.Add("No");
            pko.Keywords.Default = "Yes";
            PromptResult pkr = ed.GetKeywords(pko);
            if (pkr.Status != PromptStatus.OK || pkr.StringResult == "No")
                return;
            db.UpdateExt(true);
            ViewTableRecord newView = CreateViewWithExtents(
                db.Extmin,
                db.Extmax);
            newView.ViewDirection = new Vector3d(0, 0, 1);
            newView.Name = pr.StringResult;
            vt.UpgradeOpen();
            vt.Add(newView);
            Tx.AddNewlyCreatedDBObject(newView, true);
        }
        ViewTableRecord vtrToUse = Tx.GetObject(
          vt[pr.StringResult], OpenMode.ForRead)
            as ViewTableRecord;
        using (ViewTableRecord vtr = new ViewTableRecord())
        {
            vtr.CopyFrom(vtrToUse);  
            ed.SetCurrentView(vtr);
        }
        if (vtrToUse.IsUcsAssociatedToView)
        {
            UcsTable ucsTbl = Tx.GetObject(db.UcsTableId, OpenMode.ForRead)
                as UcsTable;
            if (ucsTbl.Has(vtrToUse.UcsName))
            {
                UcsTableRecord ucs = Tx.GetObject(
                    vtrToUse.UcsName, OpenMode.ForRead) as UcsTableRecord;
                ViewportTableRecord vportTblRec = Tx.GetObject(
                  ed.ActiveViewportId, OpenMode.ForWrite)
                    as ViewportTableRecord;
                // Display the UCS Icon at the origin of the current viewport
                vportTblRec.IconAtOrigin = true;
                vportTblRec.IconEnabled = true;
                // Set the UCS current
                vportTblRec.SetUcs(ucs.ObjectId);
                doc.Editor.UpdateTiledViewportsFromDatabase();
            }
        }
        Tx.Commit();
    }
}
ViewTableRecord CreateViewWithExtents(Point3d p1, Point3d p2)
{
    Point2d min2d = new Point2d(min(p1.X, p2.X), min(p1.Y, p2.Y));
    Point2d max2d = new Point2d(max(p1.X, p2.X), max(p1.Y, p2.Y));
    ViewTableRecord view = new ViewTableRecord();
    view.CenterPoint = min2d + (max2d - min2d) * 0.5;
   view.Height = max2d.Y - min2d.Y;
    view.Width = max2d.X - min2d.X;
    return view;
}
private double min(double a, double b)
{
    return (a < b ? a : b);
}
private double max(double a, double b)
{
    return (a > b ? a : b);
}


论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-11-17 22:43 , Processed in 0.184466 second(s), 28 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表