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());
        
        

     }




 }
相关推荐
人工智能训练43 分钟前
从 1.1.3 到 1.13.2!Ubuntu 24.04 上 Dify 升级保姆级教程(零数据丢失 + 一键迁移)
linux·运维·人工智能·windows·ubuntu·dify
mldlds1 小时前
Windows安装Redis图文教程
数据库·windows·redis
softbangong2 小时前
815-批量Excel文件合并工具,批量excel文件、工作表合并软件
linux·windows·excel·文件合并·excel合并·数据整理
烛之武2 小时前
Nacos3.2.0下载安装教程(Windows版本)
windows
竹之却3 小时前
【OpenClaw】云服务器端 openclaw 集成本地 Windows端 ollama 模型
windows·llama·ollama·openclaw·qwen3.5
阿昭L3 小时前
Windows通用的C/C++工程CMakeLists
c语言·c++·windows·makefile·cmake
公子小六3 小时前
基于.NET的Windows窗体编程之WinForms控件简介
windows·microsoft·c#·.net
PH = 73 小时前
Windows文件备份方案推荐
windows
加斯顿工程师4 小时前
Windows系统使用Ollama本地化部署Qwen3.5-9B模型教程
windows·大模型·本地部署·ollama·qwen3.5
爱学习的小囧4 小时前
VMware ESXi V7 无 vCenter 虚拟机磁盘缩减攻略:安全释放存储空间(不丢数据)
服务器·网络·windows·安全·esxi·虚拟化