摘要：1、AcdbEntGet用于获取实体的组码。示例：' 定义保存实体名称的变量Dim ent() As Integer = New Integer() {} ' 获取最后一个实体mcnetarx.GlobalFunctions.AcdbEntLast(ent)' 获取实体的DXF组码Dim rb ... 阅读全文

摘要：1、AcdbEntLast用于获取最后一个创建的实体。2、AcdbEntNext用于获取指定实体名称之后的下一个创建的实体。' 定义保存实体名称的变量Dim ent() As Integer = New Integer() {} ' 获取最后一个实体mcnetarx.GlobalFunction... 阅读全文

摘要：1、创建一个结果缓冲区。2、调用AcdbEntMake创建对象。示例：' 创建文字实体Dim rb As ResultBuffer = New ResultBufferrb.Add(New TypedValue(DxfCode.Start, "TEXT"))rb.Add(New TypedValue... 阅读全文

摘要：通过自定义MarkerSymbol的控件模板，实现在ArcGIS中扩展符号样式。<esri:MarkerSymbol x:Key="myMarkerSymbolTemplate"> <esri:MarkerSymbol.ControlTemplate> <ControlTemplate> <Grid> <Canvas> <Polyline Points="0,0 10,0 5,10" Stroke="Red" StrokeThickness="2" 阅读全文

摘要：在FeatureLayer的Initialized事件中，MapTip通过Template加载自定义的控件模板，然后创建一个Canvas承载MapTip，并添加到页面上。Private Sub FeatureLayer_Initialized(ByVal sender As Object, ByVal e As EventArgs) Dim c As Canvas = New Canvas Dim mt As MapTip = New MapTip() With {.Template = CType(Application.Current.Resources("myMapTipTe. 阅读全文

摘要：1、用Reflector反编译时，有时候会产生T?，这时候可用Nullable(Of T)代替，通过HasValue来判断是否有值，而Value能获取T的值。 2、用Reflector反编译时，有时候会产生 Try ... CatchX As Object ... End Try 这时候应该用Exception代替Object，表示异常。 3、用Reflector反编译时，有时候会产生 Public Custom Event X As EventHandler AddHandler(ByVal value As EventHandler) Dim handler2 As EventHandl. 阅读全文

摘要：DevExpress的.Net组件是功能较全的第三方组件，但其安装、发布都相对麻烦，重新编译涉及大量的项目更复杂。传统的方法是通过脚本来编译，需要了解项目的相互依存关系。 研究编译脚本，可理清思路，大体流程如下：1、判断强签名文件是否存在，如不存在则生成。2、从强签名文件中导出公钥。3、判断项目中的AssemblyInfo.cs是否存在“PublicKey=”的字符串，如存在则替换。4、按项目的依存关系编译。 从上面可以看出，步骤3和4的工作量最大。对于3可以写段代码解决，思路是通过递归查找所有的文件，然后用正则表达式实现替换。 Public Sub ReplacePublicKey(... 阅读全文

摘要：一般的切图都是基于GIS平台，这种方式编程简单，但效率不高。通过MITab在内存中切图，可极大的提高效率。实现切图的步骤：1、空间对象的读取。2、空间对象的分块。3、空间对象在GDI中的映射。4、空间对象在GDI中的绘制。 我们重温下使用MITab读取MapInfo的TAB文件代码：'/************************************************************************/'/* ReadFile */'/****************************************************** 阅读全文