- 1、本文档共49页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
AE创建各种类型的featureclass代码
AE 中新建 shapefile,自定义字段
代码由 ESRI 社区 GIScafe 提供
IFields pFields = new FieldsClass();
IFieldsEdit pFieldsEdit = pFields as IFieldsEdit;
IField pField = new FieldClass();
IFieldEdit pFieldEdit = pField as IFieldEdit;
pFieldEdit.Name_2 = shape;
pFieldEdit.Type_2 = esriFieldType.esriFieldTypeGeome
try;
//set up Geometry Definition
IGeometryDef pGeometryDef = new GeometryDefClass();
IGeometryDefEdit pGeometryDefEdit = pGeometryDef a
s IGeometryDefEdit;
pGeometryDefEdit.GeometryType_2 = esriGeometryType.e
sriGeometryPoint; //Point,line,polygon et.
pGeometryDefEdit.SpatialReference_2 = axMapControl1.
SpatialReference;
pFieldEdit.GeometryDef_2 = pGeometryDef;
pFieldsEdit.AddField(pField);
//新建字段
pField = new FieldClass();
pFieldEdit = pField as IFieldEdit;
pFieldEdit.Length_2 = 15;
pFieldEdit.Name_2 = SchoolName;
pFieldEdit.AliasName_2 = SchoolName;
pFieldEdit.Type_2 = esriFieldType.esriFieldTypeStrin
g;
pFieldsEdit.AddField(pField);
string mappath = @E:\data;
string layername=school;
IWorkspaceFactory pWorkspaceFactory = new ShapefileW
orkspaceFactory();
IFeatureWorkspace pFeatureWorkspace = pWorkspaceFact
ory.OpenFromFile(mappath,0) as IFeatureWorkspace;
pFeatureWorkspace.CreateFeatureClass(layername+.shp
,pFields,null,null,esriFeatureType.esriFTSimple,shape,);
axMapControl1.AddShapeFile(mappath,layername+.shp
);
代码中路径名称可以自定义
posted on 2008-07-12 15:28 duckweeds 阅读(137) 评论(0) 编辑 收藏 网摘 所属分类:
AE+C#
AE 创建各种类型的 featureclass 代码
VB.Net 源码
summary
创建 Annotation 类型的 featureclass
/summary
param name=pWorkspaceannotation 的工作空间/param
param name=pTextSymbolannotation 的 symbol/param
param name=pRefeScaleannotation 的比例/param
param name=pAnnoFeatNameannotation 的名称/param
returns创建的 Annotation Featureclass/returns
remarks/remarks
Private Function CreateAnnoFeatCls(ByVal pWorkspace As IFeatureWorkspace, ByVal pTextSymbol As ITextSymbol, ByVal pRefeScale As Double, ByVal pAnnoFeatName As String, Optional ByVal pSymbolID As Integer = 0) As IFeatureClass
Dim pField As IField Dim
文档评论(0)