029集——指定矩形范围内随机填充颜色半径不同的圆——vs CAD二次开发

通过鼠标在cad中框选范围,再框选范围矩形框中随机画颜色、半径不同的圆,效果如下:

代码如下:

cs 复制代码
 public static class Class1
 {
    // private static PaletteSet pset;

     [CommandMethod("xx")]
     public static async void XX()
     {
         List<Circle> circles = Z.Drawcira(6);
         Z.Zooma();
        PromptPointResult ppr =  Z.ed.GetPoint("");
       var pt =  ppr.Value;
         PromptPointResult ppr1 = Z.ed.GetPoint("");
         var pt1 = ppr1.Value;
         double minx = Math.Min(pt1.X, pt.X);
         double miny = Math.Min(pt1.Y, pt.Y);
         double maxx = Math.Max(pt1.X, pt.X);
         double maxy = Math.Max(pt1.Y, pt.Y);
         int.TryParse(Math.Round(minx,0).ToString(),out int  a);
         int.TryParse(Math.Round(maxx, 0).ToString(), out int b);
         int.TryParse(Math.Round(miny, 0).ToString(), out int c);
         int.TryParse(Math.Round(maxy, 0).ToString(), out int d);
         ;
         Random random = new Random();
         List<Circle> cs = new List<Circle>();
         for (int i = 0; i < 5000; i++)
         {
             Circle circle = new Circle()
             {ColorIndex = random.Next(0,15),Radius = random.Next(20,100),
              Center  = new Point3d(random.Next( a, b), random.Next(c, d),0)  };
             cs.Add(circle);
         }
         Z.db.AddEntityToModeSpace(cs.ToArray());
        
        

     }




 }
相关推荐
小羊没烦恼!3 天前
初探性能优化——2个月到4小时的性能提升
java·开发语言·windows·算法·c#
rockmelodies3 天前
# Windows Server2008 R2 Standard(SP1镜像U盘)重置本地管理员密码【完整详细步骤】
windows·密码破解
kakakahahahaha3 天前
Windows C盘空间不足的安全清理与迁移流程
windows·电脑·笔记本电脑·软件需求·c盘清理
做咩啊~3 天前
远程连接提示:身份验证错误,要求的函数不受支持
windows
百事牛科技3 天前
PPT只读怎么取消?四种情况分别处理
windows·powerpoint
熊明才4 天前
WSL2 网络突然瘫痪(Network is unreachable / 没有 eth0)最短修复指南(2026年9月20日亲测可用)
linux·windows·wsl2
xbzb4 天前
Windows 启动故障修复知识整理:蓝屏 / 无限重启 / 盘符 X / 无 PE 盘
windows
我命由我123454 天前
Mac 操作系统 - 一些使用记录
运维·windows·学习·系统安全·运维开发·mac·学习方法
kakakahahahaha5 天前
Windows Steam 游戏存档在哪里?定位和恢复排查流程
windows·其他·电脑·笔记本电脑·内容运营·软件需求
Xy-unu5 天前
Windows 开启外接显示器 HDR 后外接显示器无信号、无法扩展模式故障记录
windows