宗地自动编号及属性赋值

最新推荐文章于 2024-04-22 09:59:37 发布

招招有情

最新推荐文章于 2024-04-22 09:59:37 发布

阅读量1k

点赞数

文章标签：数据库开发

本文链接：https://blog.csdn.net/jfmyes/article/details/119507997

版权

宗地自动编号及属性赋值

关键词：AuotoCAD.Net；不动产权调查；宗地自动编号；属性赋值
不动产调查是以宗地、宗海为单位，查清宗地、宗海及其房屋(建、构筑物)信息、森林和林木信息等。按常规方法作业，一个行政村约3000个宗地进行编号并赋上扩展属性，一个作业员大约需要一周，我利用AuotoCAD.Net开发了一个程序，20分钟就可完成。
原料：外业调查底图，包括：权属线、权利人、其他相关地形无素。如下图：

在这里插入图片描述
准备工作：画一条多段线，按宗地编号的顺序串连所有宗地的权属线，如上图中的蓝色线，以下称串连线。
编程思路：
1、创建一个宗地集合，用于记录权属线的句柄、交点到起点的距离、权利人姓名、宗地号；
2、所有宗地与串连线相交，找出多个交点中离串连线起点最近的交点，并记录交点到起点的距离；
3、所有宗地按交点到起点的距离进行排序，按排序后的顺序给宗地进行编号；
4、以次为每一个宗地创建范围选择集，查找权利人，给宗地添加扩展属性；
5、宗地内标注宗地注记；
6、添加界址点。
在这里插入图片描述

核心源代码：
using System;
using System.Collections;
using System.Collections.Generic; //泛型集合接口
using System.Linq; //语言集成查询 (LINQ)
using System.Data;
using System.IO; //文件系统
using System.Windows.Forms;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.Runtime;
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.Geometry;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.Colors; //颜色
using System.Globalization; //全球化信息的类，包括国家/地区/语言/日历/日期/货币和数字的格式模式，以及字符串的排序顺序
using System.Data.SqlClient; //用于 SQL Server 的 .NET 数据提供程序
using System.Data.OleDb; //用于 Oracle、SQL Server、Access等的 .NET 数据提供程序
using JFMClassLibrary;
using AcadApp = Autodesk.AutoCAD.ApplicationServices.Application;
using myBox = Microsoft.VisualBasic.Interaction;

namespace 不动产调查
{
public static class 房产图
{

    public static System.Data.DataTable 串连线地块表(string 图层)   
    {
        Database db = HostApplicationServices.WorkingDatabase;          // 获取当前图形数据库
        Editor ed = AcadApp.DocumentManager.MdiActiveDocument.Editor;   //获取命令行对象
        ObjectId PlineId = ed.GetEntity("\n请选择串连地块的多段线").ObjectId;
        System.Data.DataTable NewTable = 内存数据库.数据库.Tables.Add("宗地表");      //数据库添加一张表                      
        NewTable.Columns.Add(new System.Data.DataColumn("宗地代码", typeof(String)));   //数据表中添加字段
        NewTable.Columns.Add(new System.Data.DataColumn("权利人", typeof(String)));            
        NewTable.Columns.Add(new System.Data.DataColumn("pHandle", typeof(Handle)));
        NewTable.Columns.Add(new System.Data.DataColumn("距离", typeof(Double)));
        Point3d errPoint =new Point3d();
        DateTime Xtime = DateTime.Now;
        db.新建图层("串连线", 7);
        模型空间.ZoomExtens();
        TypedValue[] values = new TypedValue[]
        {                          
            new TypedValue (8,图层),     
            new TypedValue (0 ,"LWPOLYLINE"),   
        };
        SelectionFilter filter = new SelectionFilter(values);
        PromptSelectionResult psr = ed.SelectAll(filter);
        if (psr.Status != PromptStatus.OK) { return NewTable; }   //选择集创建失败，返回 
        int 地块数 = psr.Value.Count;
        using (Transaction Trans = db.TransactionManager.StartTransaction())
        {
            try
            {
                Polyline pLine = Trans.GetObject(PlineId, OpenMode.ForWrite) as Polyline;
                if (pLine == null) { return NewTable; }     //打开多段线失败，返回                   
                pLine.Layer = "串连线";
                foreach (var id in psr.Value.GetObjectIds())
                {
                    Polyline dkPoly = Trans.GetObject(id, OpenMode.ForWrite) as Polyline;
                    if (dkPoly == null) continue;    //跳过一次循环迭代
                    dkPoly.ColorIndex = 2;
                    System.Data.DataRow newRow = NewTable.NewRow();   //数据表中添加一行
                    newRow["pHandle"] = dkPoly.Handle;
                    double SS = 10000000;
                    Point3dCollection intPoints = new Point3dCollection();
                    pLine.IntersectWith(dkPoly, Intersect.OnBothOperands, intPoints, IntPtr.Zero, IntPtr.Zero);
                    if (intPoints.Count > 0)
                    {                          
                        foreach (Point3d pt in intPoints)
                        {
                            errPoint = pt;
                            double S = pLine.GetDistAtPoint(pt);
                            if (S < SS) SS = S;
                        }                           
                        dkPoly.ColorIndex = 1;
                    }
                    newRow["距离"] = SS;
                    NewTable.Rows.Add(newRow);   //把新行插入数据表
                }
                Trans.Commit();
            }
            catch
            {
                ed.WriteMessage("\n出现异常的位置：" + errPoint.ToString());
                AcadApp.ShowAlertDialog("在点：" + errPoint.ToString() + "出现异常：可能是交点正好在串连线的折点处！");
                Trans.Abort(); return NewTable;
            }//如有异常，撤销事务                
        }
        AcadApp.ShowAlertDialog("共选到" + 地块数.ToString() + "个地块，已编号：" +
            NewTable.Rows.Count.ToString() + "个地块(红色)，黄色地块未与串连线相交！");
        return NewTable;
    }

    public static string 范围权利人(this Polyline pLine,string 图层, ref Point3d 中心点)  
    {
        string 权利人 = "未申报";
        Point3dCollection Fypts = pLine.多段线坐标(ref 中心点);           
        TypedValue[] Textvalues = new TypedValue[]
        {                                         
            new TypedValue (8,图层),                 
            new TypedValue (0 ,"Text"),   
        };
        Database db = HostApplicationServices.WorkingDatabase;
        Editor ed = AcadApp.DocumentManager.MdiActiveDocument.Editor;   //获取命令行对象
        SelectionFilter filter = new SelectionFilter(Textvalues);
        PromptSelectionResult nbTexts = ed.SelectWindowPolygon(Fypts, filter);
        if (nbTexts.Status != PromptStatus.OK) return 权利人;
        using (Transaction trans = db.TransactionManager.StartTransaction())
        {
            foreach (var id in nbTexts.Value.GetObjectIds())
            {
                DBText tent = (DBText)(object)id.GetObject(OpenMode.ForRead);
                权利人= tent.TextString;
                ResultBuffer datas = new ResultBuffer();
                datas.Add(new TypedValue(1001, "SOUTH"));
                datas.Add(new TypedValue(1000, "302004"));
                tent.创建扩展数据("SOUTH", datas); 
            }   
            trans.Commit();    //提交事务处理              
        }
        return 权利人;
    }

    public static void 房产宗地编号赋属性()  
    {
        Database db = HostApplicationServices.WorkingDatabase;          // 获取当前图形数据库
        Editor ed = AcadApp.DocumentManager.MdiActiveDocument.Editor;   //获取命令行对象 
        string 村代码 = 交互选择.GetString("请输入行政村的代码：", "106024");
        string 权属线图层 = "1权属线";
        string 权利人图层="2现权利人";
        System.Data.DataTable 数据表 = 串连线地块表(权属线图层);   //2现权利人
        数据表.DefaultView.Sort = "距离";          //按距离这个字段的值进行排序
        数据表 = 数据表.DefaultView.ToTable();     //更新表
        db.开关全部图层(false, false);
        db.新建图层("JZD", 4);
        模型空间.按图层删除对象("JZD", "Text");
        模型空间.缩放文字注记(权利人图层, 0.2);

        DateTime Xtime = DateTime.Now;   //获取当前本地时间      
        ProgressMeter pm = new ProgressMeter();//设置进度条对象
        MessageFilter 按键消息 = new MessageFilter();//创建消息过滤类
        System.Windows.Forms.Application.AddMessageFilter(按键消息);//为程序添加消息过滤
        bool esc = false;
        using (Transaction trans = db.TransactionManager.StartTransaction())
        {
            try
            {
                int 宗地号 = 0;
                pm.Start("程序正在进行----");
                pm.SetLimit(数据表.Rows.Count);
                foreach (DataRow sr in 数据表.Rows)
                {
                    宗地号 = 宗地号 + 1;
                    pm.MeterProgress();  //更新进进度条
                    Handle pHandle = sr.Field<Handle>("pHandle");
                    ObjectId id = db.GetObjectId(false, pHandle, 0);
                    Polyline pLine = trans.GetObject(id, OpenMode.ForWrite) as Polyline;
                    //pLine.ColorIndex = 3;
                    pLine.LineWeight = LineWeight.LineWeight020;
                    Point3d 中心点 = new Point3d();
                    sr["权利人"] = pLine.范围权利人(权利人图层, ref 中心点);  //添加宗地号注记
                    sr["宗地代码"]= 村代码 + 宗地号.ToString("D5");                                               
                    ResultBuffer datas = new ResultBuffer();
                    datas.Add(new TypedValue(1001, "SOUTH"));
                    datas.Add(new TypedValue(1000, "300000"));
                    datas.Add(new TypedValue(1000, sr["权利人"]));
                    datas.Add(new TypedValue(1000, sr["宗地代码"]));
                    datas.Add(new TypedValue(1000,"0702"));
                    datas.Add(new TypedValue(1000,"QHDM"));
                    datas.Add(new TypedValue(1000,"340522"));                                                                                                                        
                    pLine.删除扩展数据();
                    pLine.创建扩展数据("SOUTH", datas);   //将新建的扩展数据附加到实体中 
                    //画横线
                    Point3d startPoint=new Point3d(中心点.X+2.1,中心点.Y,0);
                    Point3d endPoint=new Point3d(中心点.X-2.1,中心点.Y,0);
                    Line line = new Line(startPoint, endPoint);
                    db.AddToModelSpace(line);
                    line .Layer="JZD";
                    line.ColorIndex=1;
                    datas = new ResultBuffer();
                    datas.Add(new TypedValue(1001, "SOUTH"));
                    datas.Add(new TypedValue(1000, "302001"));
                    line.创建扩展数据("SOUTH", datas); 
                     //标注宗地号
                    Point3d pt=new Point3d(中心点.X,中心点.Y+0.25,0);
                    DBText textFirst = db.对齐文字(宗地号.ToString("D5"), pt, TextHorizontalMode.TextCenter, TextVerticalMode.TextBottom, 1.5, "JZD");                                                                      
                    textFirst.ColorIndex = 1;                       
                    datas = new ResultBuffer();
                    datas.Add(new TypedValue(1001, "SOUTH"));
                    datas.Add(new TypedValue(1000, "302002"));
                    textFirst.创建扩展数据("SOUTH", datas); 
                     //标注地类号
                    pt=new Point3d(中心点.X,中心点.Y-0.25,0);
                    textFirst = db.对齐文字("0702", pt, TextHorizontalMode.TextCenter, TextVerticalMode.TextBottom, 1.5, "JZD");                        
                    textFirst.ColorIndex = 1;
                    db.AddToModelSpace(textFirst);
                    datas = new ResultBuffer();
                    datas.Add(new TypedValue(1001, "SOUTH"));
                    datas.Add(new TypedValue(1000, "302003"));
                    textFirst.创建扩展数据("SOUTH", datas); 
                    if (按键消息.KeyName == Keys.Escape) { esc = true; } //如果用户按下了Esc键，则结束历遍                       
                    System.Windows.Forms.Application.DoEvents();        //让AutoCAD在长时间任务处理时仍然能接收消息
                }
                pm.Stop();  //停止进度条更新
                if (esc) trans.Abort();
                else trans.Commit();
            }
            catch
            {
                trans.Abort(); return;
            }//如有异常，撤销事务                
        }
        模型空间.缩放文字注记(权利人图层, 2);
        DateTime Xtime1 = DateTime.Now;   //获取当前本地时间                     
        TimeSpan ts = new TimeSpan();
        ts = Xtime1 - Xtime;
        ed.WriteMessage("\n使用时间：" + ts.Hours + "小时" + ts.Minutes + "分" + ts.Seconds + "秒");
        System.Windows.Forms.Application.RemoveMessageFilter(按键消息); //移除对按键消息的过滤
        数据表.Dispose();      //释放资源
    }

}

}

欢迎使用Markdown编辑器

你好！这是你第一次使用 Markdown编辑器 所展示的欢迎页。如果你想学习如何使用Markdown编辑器, 可以仔细阅读这篇文章，了解一下Markdown的基本语法知识。

新的改变

我们对Markdown编辑器进行了一些功能拓展与语法支持，除了标准的Markdown编辑器功能，我们增加了如下几点新功能，帮助你用它写博客：

全新的界面设计 ，将会带来全新的写作体验；
在创作中心设置你喜爱的代码高亮样式，Markdown 将代码片显示选择的高亮样式 进行展示；
增加了 图片拖拽 功能，你可以将本地的图片直接拖拽到编辑区域直接展示；
全新的 KaTeX数学公式 语法；
增加了支持甘特图的mermaid语法¹ 功能；
增加了 多屏幕编辑 Markdown文章功能；
增加了 焦点写作模式、预览模式、简洁写作模式、左右区域同步滚轮设置 等功能，功能按钮位于编辑区域与预览区域中间；
增加了 检查列表 功能。

功能快捷键

撤销：Ctrl/Command + Z
重做：Ctrl/Command + Y
加粗：Ctrl/Command + B
斜体：Ctrl/Command + I
标题：Ctrl/Command + Shift + H
无序列表：Ctrl/Command + Shift + U
有序列表：Ctrl/Command + Shift + O
检查列表：Ctrl/Command + Shift + C
插入代码：Ctrl/Command + Shift + K
插入链接：Ctrl/Command + Shift + L
插入图片：Ctrl/Command + Shift + G
查找：Ctrl/Command + F
替换：Ctrl/Command + G

合理的创建标题，有助于目录的生成

直接输入1次#，并按下space后，将生成1级标题。
输入2次#，并按下space后，将生成2级标题。
以此类推，我们支持6级标题。有助于使用TOC语法后生成一个完美的目录。

如何改变文本的样式

强调文本 强调文本

加粗文本 加粗文本

标记文本

~~删除文本~~

引用文本

H₂O is是液体。

2¹⁰ 运算结果是 1024.

插入链接与图片

链接: link.

图片: Alt

带尺寸的图片:

居中的图片: Alt

居中并且带尺寸的图片:

当然，我们为了让用户更加便捷，我们增加了图片拖拽功能。

如何插入一段漂亮的代码片

去博客设置页面，选择一款你喜欢的代码片高亮样式，下面展示同样高亮的 代码片.

// An highlighted block
var foo = 'bar';

生成一个适合你的列表

项目
- 项目
  - 项目

项目1
项目2
项目3

计划任务
完成任务

创建一个表格

一个简单的表格是这么创建的：

项目	Value
电脑	$1600
手机	$12
导管	$1

设定内容居中、居左、居右

使用:---------:居中
使用:----------居左
使用----------:居右

第一列	第二列	第三列
第一列文本居中	第二列文本居右	第三列文本居左

SmartyPants

SmartyPants将ASCII标点字符转换为“智能”印刷标点HTML实体。例如：

TYPE	ASCII	HTML
Single backticks	`'Isn't this fun?'`	‘Isn’t this fun?’
Quotes	`"Isn't this fun?"`	“Isn’t this fun?”
Dashes	`-- is en-dash, --- is em-dash`	– is en-dash, — is em-dash

创建一个自定义列表

Markdown

Text-to- HTML conversion tool

Authors

John

Luke

如何创建一个注脚

一个具有注脚的文本。²

注释也是必不可少的

Markdown将文本转换为 HTML。

KaTeX数学公式

您可以使用渲染LaTeX数学表达式 KaTeX:

Gamma公式展示 $\Gamma(n) = (n-1)!\quad\forall n\in\mathbb N$ 是通过欧拉积分

$\Gamma(z) = \int_0^\infty t^{z-1}e^{-t}dt\,.$

你可以找到更多关于的信息 LaTeX 数学表达式here.

新的甘特图功能，丰富你的文章

关于 甘特图 语法，参考这儿,

UML 图表

可以使用UML图表进行渲染。 Mermaid. 例如下面产生的一个序列图：

这将产生一个流程图。:

关于 Mermaid 语法，参考这儿,

FLowchart流程图

我们依旧会支持flowchart的流程图：

关于 Flowchart流程图 语法，参考这儿.

导出与导入

导出

如果你想尝试使用此编辑器, 你可以在此篇文章任意编辑。当你完成了一篇文章的写作, 在上方工具栏找到 文章导出 ，生成一个.md文件或者.html文件进行本地保存。

导入

如果你想加载一篇你写过的.md文件，在上方工具栏可以选择导入功能进行对应扩展名的文件导入，
继续你的创作。

mermaid语法说明 ↩︎
注脚的解释 ↩︎

招招有情

关注

0
点赞
踩
2

收藏

觉得还不错? 一键收藏
0
评论
宗地自动编号及属性赋值

宗地自动编号及属性赋值欢迎使用Markdown编辑器你好！这是你第一次使用 Markdown编辑器所展示的欢迎页。如果你想学习如何使用Markdown编辑器, 可以仔细阅读这篇文章，了解一下Markdown的基本语法知识。新的改变我们对Markdown编辑器进行了一些功能拓展与语法支持，除了标准的Markdown编辑器功能，我们增加了如下几点新功能，帮助你用它写博客：全新的界面设计，将会带来全新的写作体验；在创作中心设置你喜爱的代码高亮样式，Markdown 将代码片显示选择的高亮样式
复制链接

扫一扫