ArcGIS接口詳細(xì)說明之個人開發(fā)心得

1、arcgis接口詳細(xì)說明之個人開發(fā)心得萬人迷先生217 /文 tj051181 /整理1.        關(guān)于ifield接口（esrigeodatabase）3樓2.        關(guān)于ifieldedit接口（esrigeodatabase）4樓3.        關(guān)于ifields接口（esrigeodatabase）5樓4.        關(guān)于ipo

2、int接口（esrigeometry）6樓5.        關(guān)于ipointarray接口（esrigeometry）7樓6.        關(guān)于ipointcollection接口（esrigeometry）8樓        7.        關(guān)于ipolyline接口（esrigeometry）9樓8.    

3、60;  關(guān)于igeometry接口（esrigeometry）10樓9.        關(guān)于iarea接口（esrigeometry）11樓10.        關(guān)于ienvelope接口（esrigeometry）12樓11.        關(guān)于ifeature接口（esrigeodatabase）13樓12.        關(guān)于ir

4、ow接口（esrigeodatabase）14樓13.        關(guān)于ifeatureclass接口（esrigeodatabase）15樓14.        關(guān)于itable接口（esrigeodatabase）16樓15.        關(guān)于ifeaturecursor接口（esrigeodatabase）17樓16.        關(guān)于iquer

5、yfilter接口（esrigeodatabase）18樓17.        關(guān)于ifeaturelayer接口（esricarto）19樓18.        關(guān)于ifeatureselection接口（esricarto）20樓19.        關(guān)于imap接口(esricarto) 21樓20.        關(guān)于ipropertyset接口(e

6、srisystem) 22樓21.        關(guān)于ifeatureworkspace接口（esrigeodatabase）23樓22.        關(guān)于iworkspaceedit接口（esrigeodatabase）24樓23.        關(guān)于iworkspacefactory接口（esrigeodatabase）25樓24.        關(guān)于

7、itopologicaloperator接口（esrigeometry）26樓25.        創(chuàng)建buffer并選擇里面的要素 27樓26.        merge要素union要素  28樓27.        怎樣從table中獲取具體需求值的row 42樓28.        怎樣zoomincenter 43樓29.

8、60;       怎樣讀取一個字段內(nèi)的所有值 44樓30.        怎樣編輯更改屬性字段的值 45樓31.        怎樣將mapcontrol中的map復(fù)制到pagelayoutcontrol中 47樓32.        怎樣判斷是否出于編輯狀態(tài) 63樓33.        怎樣用點創(chuàng)建一個p

9、olygon 64樓34.        怎樣運(yùn)用屬性來計算總面積 65樓35.        關(guān)于屬性域的一些心得 82樓36.        怎樣實現(xiàn)翻折flip方法 83樓37.        回答cumtbgis關(guān)于itopologicaloperator接口clip方法的問題 87樓38.      

10、0; 回答機(jī)器貓fjj關(guān)于ispatialfilter接口方法的問題（完整函數(shù)） 91樓39.        回答網(wǎng)友韶華響當(dāng)當(dāng)關(guān)于更改符號的代碼（完整函數(shù)） 100樓40.        回答網(wǎng)友韶華響當(dāng)當(dāng)關(guān)于顯示屬性的代碼（完整函數(shù)） 101樓41.        回答gjw1015關(guān)于ifeature變量添加進(jìn)list<ifeature>數(shù)組里的問題 112樓1.   

11、     關(guān)于ifield接口（esrigeodatabase）ifield接口的第一個屬性aliasname（只讀，獲得字段的別名）ifield接口的第二個方法checkvalue（value）（方法，對于指定的屬性字段，基于字段類型判斷參數(shù)值是否有效，有效，則返回true，否則返回false）例子代碼：ifeatureclass pfc_scp_pt;editpt = new fieldclass();editpt.precision_2 = 8;editpt.scale_2 = 3;editpt.name_2 = "elev1"

12、editpt.type_2 = esrifieldtype.esrifieldtypedouble;ifield接口的其他屬性均為只讀屬性，常用有name（只讀，獲得字段的名稱）例子代碼：dim pfields as ifieldsdim pfield as ifielddim pgeodef as igeometrydefdim pdomain as idomaindim i as longset pfields = pfeatclass.fieldsfor i = 0 to pfields.fieldcount - 1  set pfield = pfields.fie

13、ld(i)  if pfield.type = esrifieldtypegeometry then    set pgeodef = pfield.geometrydef  else    debug.print pfield.aliasname    debug.print pfield.defaultvalue    set pdomain = pfield.domain    debug.print pfield.editable  &#

14、160; debug.print pfield.isnullable    debug.print pfield.length    debug.print pfield.name    debug.print pfield.precision    debug.print pfield.required    debug.print pfield.scale    debug.print pfield.type    debug.print pfield

15、.vartype  end ifnext2.        關(guān)于ifieldedit接口（esrigeodatabase）所有該接口的屬性均為可讀可寫，經(jīng)常用與對新建字段的設(shè)置，因為字段一旦被設(shè)置，其基本屬性就不能被更改，所以就需要該接口類型的變量去轉(zhuǎn)換，方法為：ifeatureclass pfc_scp_pt;ifieldedit editpt = new fieldclass();pfc_scp_pt.addfield(ifield)editpt);如果在vb中去編寫代碼，則賦值和獲取均為同一屬性，而在c#中，為了區(qū)分設(shè)置和獲取，

16、屬性均有兩個，類似于name和name_2，這樣就可以區(qū)分了，普遍用設(shè)置的帶有_2的那個屬性。ifieldedit接口的第一個屬性name （讀寫，設(shè)置或者獲取該變量類型變量字段的名稱）ifieldedit接口的第二個屬性precision（讀寫，設(shè)置或者獲取該變量類型變量字段的長度）ifieldedit接口的第三個屬性scale（讀寫，設(shè)置或者獲取該變量類型變量字段的精度）ifieldedit接口的第四個屬性type（讀寫，設(shè)置或者獲取該變量類型變量字段的類型）例子代碼：ifeatureclass pfc_scp_pt;editpt = new fieldclass();editpt.pre

17、cision_2 = 8;editpt.scale_2 = 3;editpt.name_2 = "elev1"editpt.type_2 = esrifieldtype.esrifieldtypedouble;3.        關(guān)于ifields接口（esrigeodatabase）ifields接口的第一個屬性field(index)（只讀，以用于獲取具體的字段，返回類型為ifield）ifields接口的第二個屬性fieldcount（只讀，以用于獲取屬性的數(shù)量）利用上面兩個接口并用索引去依次循環(huán)獲得每一列的

18、屬性pfield（ifield接口）例子代碼：dim i as longdim pfield as ifieldfor i = 0 to (pfields.fieldcount - 1)    set pfield = pfields.field(i)    debug.print pfield.name & ": " & pfield.typenext iifields接口的第三個方法findfield(name)（方法，輸入想要查找的屬性域字段的名稱，如果有，則返回該屬性域字段在此fields的索引，沒有則返回-1

19、）例子代碼：dim i as integerdim pfields as ifieldsdim pfield as ifield'get fieldsset pfields = pfeatclass.fields'find the field named "average_income"i = pfields.findfield("average_income")'set the current fieldset pfield = pfields.field(i)'delete field from featureclas

20、spfeatclass.deletefield pfieldifields接口的第四個方法findfieldbyaliasname(name)（方法，與第三個方法類似，此時輸入的為該列屬性字段的別名，此方法不經(jīng)常用）例子代碼：dim i as integerdim pfields as ifieldsdim pfield as ifield'get fieldsset pfields = pfeatclass.fields 'find the field with the aliasname "current population"i = pfields.f

21、indfieldbyaliasname("current population")'set the current fieldset pfield = pfields.field(i)'delete field from featureclasspfeatclass.deletefield pfield4.        關(guān)于ipoint接口（esrigeometry）ipoint接口的第一個方法putcoords(x,y)（方法，設(shè)置該點的坐標(biāo)）或者直接調(diào)用可以讀寫的屬性x和y，將坐標(biāo)賦值給x和y例子代碼：dim p

22、point as ipointset ppoint = new pointppoint.putcoords 100, 100ipoint接口的第二個方法querycoords(x,y) （方法，得到該點的坐標(biāo)）例子代碼：dim ppoint as ipointdim dx as double, dy as doubleppoint.querycoords dx, dyipoint接口的第三個方法constrainangle (constraintangle, anchor, allowopposite ) （方法，如果第三個參數(shù)allowopposite為true，則將第二個參數(shù)anchor這

23、個點作為一個原點，然后以第一個參數(shù) constraintangle為與x軸的角度，做一條直線，再將調(diào)用此參數(shù)的點向該直線做垂線并交于一個新點，并將調(diào)用此方法的點移動到該點）例子代碼：'finds the closes point to line from (0,0) with angles 'defined by steps of pi/4 (note all angles in radians)    dim papoint as ipoint   dim pnpoint as ipoint   dim pi as

24、double   dim dangle as double   dim i as long   set papoint = new point   pi = 4 * atn(1)   dangle = 0   papoint.putcoords 0, 0   set pnpoint = new point   for i = 0 to 7     pnpoint.putcoords 1, 0

25、60;    dangle = i * pi / 4     pnpoint.constrainangle dangle, papoint, true     msgbox "angle = " & i & "*pi/4" & vbcrlf & pnpoint.x & "," & pnpoint.y   next iipoint接口的第四個方法constrai

26、ndistance (constraintradius, anchor ) （方法，以第二個參數(shù)anchor這個點為圓心，然后以第一個參數(shù)constraintradius為半徑做一個圓，將調(diào)用此參數(shù)的點移動到該點與圓心做線段交于該圓的交點上）例子代碼：public sub t_constraindistance()   dim ppoint as ipoint   dim pnpoint as ipoint   dim dradius as double      set ppoint = ne

27、w point   ppoint.putcoords 0, 0    set pnpoint = new point   pnpoint.putcoords 2, 2   dradius = 1.4142135623731      pnpoint.constraindistance dradius, ppoint   msgbox "radius = " & dradius & " x,y = "

28、& pnpoint.x & "," & pnpoint.y end sub5.        關(guān)于ipointarray接口（esrigeometry）ipointarray接口的第一個方法add(p) （方法，向該類型的數(shù)組變量添加point）ipointarray接口的第二個屬性count （只讀，獲得該數(shù)組變量中point的個數(shù)，返回long類型變量）ipointarray接口的第三個屬性element(index) （只讀，獲得該數(shù)組變量中位于參數(shù)index索引位置的點point，返回一個point類型

29、的變量）ipointarray接口的第四個方法insert (index, p ) （方法，向索引位置index插入一個點point）ipointarray接口的第五個方法remove (index )  （方法，移除索引位置index的點point）ipointarray接口的第六個方法removeall （方法，移除所有在此數(shù)組中的點）6.        關(guān)于ipointcollection接口（esrigeometry）ipointcollection接口的第一個方法addpoint(inpoint ,before ,after

30、) （方法，向該類型的點集變量添加point，第一個參數(shù)為添加的point，第二個第三個參數(shù)為可選擇的參數(shù)，默認(rèn)添加進(jìn)點集的末尾）ipointcollection接口的第二個屬性point（i） （只讀，獲得該點集變量中第i個位置的point，返回ipoint類型變量，i從0計算開始）ipointcollection接口的第三個屬性pointcount （只讀，獲得該點集變量中點的個數(shù)，返回long類型變量，切記，如果一個pointcollection變量是由閉合的geometry轉(zhuǎn)換而來的話，那么點的個數(shù)比節(jié)點數(shù)多一個，因為是閉合的，所以首位節(jié)點是同一個點）7.    &

31、#160;   關(guān)于ipolyline接口（esrigeometry）ipolyline接口的第一個屬性frompoint與topoint（讀寫，設(shè)置或者讀取該點的起始點和終止點，返回都是ipoint類型的變量）ipolyline接口的第二個方法queryfrompoint (from )（方法，返回ipoint類型的變量到參數(shù)from）ipolyline接口的第三個方法querytopoint (to ) （方法，返回ipoint類型的變量到參數(shù)to）public sub t_icurve_querypoints()   dim pid as new uid&#

32、160;  pid = "esrieditor.editor"   dim peditor as ieditor   dim papp as iapplication   set papp = mxapplication   set peditor = papp.findextensionbyclsid(pid)      if   peditor.selectioncount <> 1 then  &#

33、160;  msgbox "select one curve"     exit sub   end if      dim penumfeat as ienumfeature   dim pfeature as ifeature    set penumfeat = peditor.editselection    dim pcurve as icurve   dim ppo

34、intfrom as ipoint   dim ppointto as ipoint      set ppointfrom = new point   set ppointto = new point    set pfeature = penumfeat.next    while not pfeature is nothing     if pfeature.shape.geometrytype = esrigeometrypol

35、yline or _     esrigeometrypolyline or esrigeometryline then       set pcurve = pfeature.shape       pcurve.queryfrompoint ppointfrom       pcurve.querytopoint ppointto       msgbox "+icurve prop

36、erties." & vbcrlf _         & "curve.queryfrompoint (x,y) = " & ppointfrom.x & "," & ppointfrom.y & vbcrlf _         & "curve.querytopoint (x,y) = " & ppointto.x & "

37、;," & ppointto.y & vbcrlf     end if     set pfeature = penumfeat.next   wendend subipolyline接口的第四個方法generalize (maxallowableoffset ) （方法，用道格拉斯普克發(fā)來簡化polyline）ipolyline接口的第五個方法weed (maxallowableoffsetfactor ) （方法，和方法generalize類似，均為簡化polyl

38、ine的方法，不同的是參數(shù)。）8.        關(guān)于igeometry接口（esrigeometry）public sub t_igeometry_polygon()   dim pid as new uid   pid = "esrieditor.editor"   dim peditor as ieditor   dim papp as iapplication   set papp = application 

39、60;set peditor = papp.findextensionbyclsid(pid)      if peditor.selectioncount <>  1 then     msgbox "select one polygon"     exit sub   end if      dim penumfeat as ienumfeature 

40、  dim pfeature as ifeature   set penumfeat = peditor.editselection   dim pgeometry as igeometry   set pfeature = penumfeat.next   while not pfeature is nothing     if pfeature.shape.geometrytype = esrigeometrypolygon then（通過pfeature.sh

41、ape獲得geometry）       set pgeometry = pfeature.shape       msgbox "+polygon:igeometry properties." & vbcrlf _         & "dimension = " & pgeometry.dimension & vbcrlf _      &#

42、160;  & "geometry type = " & pgeometry.geometrytype & vbcrlf _         & "envelope =  " & pgeometry.envelope.xmin & "," & pgeometry.envelope.ymin & "," _      

43、0;  & pgeometry.envelope.xmax & "," & pgeometry.envelope.ymin & vbcrlf _         & "isempty =  " & pgeometry.isempty & vbcrlf _         & "spatialreference = " &am

44、p; pgeometry.spatialreference.name     end if     set pfeature = penumfeat.next   wend end subigeometry接口的第一個屬性dimension（只讀，返回一個類型為esrigeometrydimension的該圖形的幾何維度）-1    esrigeometrynodimension 1    esrigeometry0dimension 2  &#

45、160; esrigeometry1dimension 4    esrigeometry2dimension 5    esrigeometry25dimension 6    esrigeometry3dimensionigeometry接口的第二個屬性extent（只讀，返回一個類型為ienvelope的該圖形的幾何范圍的最大邊框）igeometry接口的第三個屬性geometrytype（只讀，返回一個類型為esrigeometrytype的該圖形的幾何類型）esrigeometrynull    

46、;      = 0esrigeometrypoint         = 1esrigeometrymultipoint    = 2esrigeometrypolyline      = 3esrigeometrypolygon       = 4esrigeometryenvelope      = 5esrigeometrypath   &

47、#160;      = 6esrigeometryany           = 7esrigeometrymultipatch    = 9esrigeometryring          = 11esrigeometryline          = 13esrigeometrycirculararc   = 14esr

48、igeometrybezier3curve  = 15esrigeometryellipticarc   = 16esrigeometrybag           = 17esrigeometrytrianglestrip = 18esrigeometrytrianglefan   = 19esrigeometryray           = 20esrigeometrys

49、phere        = 219.        關(guān)于iarea接口（esrigeometry）public sub t_iarea_polygon()   dim pid as new uid   pid = "esrieditor.editor"   dim peditor as ieditor   dim papp as iapplication   set papp

50、 = application   set peditor = papp.findextensionbyclsid(pid)   if peditor.selectioncount <>  1 then     msgbox "select one polygon"     exit sub   end if      dim penumfeat as ienumfe

51、ature   dim pfeature as ifeature   dim i as long   set penumfeat = peditor.editselection   dim parea as iarea   dim pcenter as ipoint   dim plabel as ipoint   set pcenter = new point   set plabel = new point   

52、set pfeature = penumfeat.next   while not pfeature is nothing     if pfeature.shape.geometrytype = esrigeometrypolygon then       set parea = pfeature.shape       msgbox "+polygon:iarea properties." & vbcrlf _ 

53、     & "area = " & parea.area & vbcrlf _       & "center.x = " & parea.centroid.x & vbcrlf _       & "center.y = " & parea.centroid.y & vbcrlf _       & pa

54、rea.labelpoint.x & vbcrlf _       & "labelpoint.y = " & parea.labelpoint.y       parea.querycentroid pcenter       parea.querylabelpoint plabel       msgbox "+polygon:iarea queries." &

55、 vbcrlf _       & "center = " & pcenter.x & "," & pcenter.y & vbcrlf _       & "label = " & plabel.x & "," & plabel.y & vbcrlf     end if    

56、0;set pfeature = penumfeat.next   wendend subiarea接口的第一個屬性area（只讀，返回一個double類型的數(shù)值，為此area的面積）iarea接口的第二個屬性centroid（只讀，返回一個ipoint類型的變量，為此area的重心）iarea接口的第三個屬性lablepoint（只讀，返回一個ipoint類型的變量，為此area的標(biāo)簽的位置，一般都在此area的內(nèi)部）iarea接口的第四個方法querycentroid (center ) （方法，center參數(shù)為一個ipoint類型的變量，通過調(diào)用此方法將重心點賦值給

57、參數(shù)center）iarea接口的第五個方法querylablepoint (lablepoint ) （方法，lablepoint參數(shù)為設(shè)置ipoint類型的變量，通過調(diào)用此方法將標(biāo)簽點賦值給參數(shù)lablepoint）10.        關(guān)于ienvelope接口（esrigeometry）應(yīng)用：（中心放大）public sub zoomincenter()  dim pmxdocument as imxdocument  dim pactiveview as iactiveview  di

58、m pdisplaytransform as idisplaytransformation  dim penvelope as ienvelope  dim pcenterpoint as ipoint  set pmxdocument = application.document  set pactiveview = pmxdocument.focusmap  set pdisplaytransform = pactiveview.screendisplay.displaytransforma

59、tion  set penvelope = pdisplaytransform.visiblebounds  'in this case, we could have set penvelope to iactiveview:extent  'set penvelope = pactiveview.extent  set pcenterpoint = new point    pcenterpoint.x = (penvelope.xmax - penvelo

60、pe.xmin) / 2) + penvelope.xmin  pcenterpoint.y = (penvelope.ymax - penvelope.ymin) / 2) + penvelope.ymin  penvelope.width = penvelope.width / 2  penvelope.height = penvelope.height / 2  penvelope.centerat pcenterpoint  pdisplaytransform.visiblebounds

61、 = penvelope  pactiveview.refreshend subienvelope接口的第一個方法centerat(ppoint) （方法，將這個矩形的邊框移動到參數(shù)ppoint的位置，但是其他屬性不變，如它的width和height）例子代碼：' the example shows how to move an envelope to a new ' center point (ppoint). public sub t_envcenterat()   dim penv1 as ienvelope   

62、;dim ppoint as ipoint   set penv1 = new envelope   set ppoint = new point   penv1.putcoords 100, 100, 200, 200   ppoint.putcoords 0, 0   penv1.centerat ppoint   dim dxmin as double, dymin as double, dxmax as double, dymax as double  &#

63、160;penv1.querycoords dxmin, dymin, dxmax, dymax   if penv1.isempty then     msgbox "envelope is empty"   else     msgbox dxmin & "," & dymin & "," & dxmax & "," &  dymax   end

64、 if end subienvelope接口的長寬屬性height和width屬性（讀寫，可以通過該屬性獲取或設(shè)置該邊框的長和寬）ienvelope接口的4個頂點屬性upperleft、upperright、lowerleft和lowerright（讀寫，返回ipoint類型的四個頂點，比直接獲得最值坐標(biāo)更加方便嚴(yán)謹(jǐn)）例子代碼：private sub form_load()   set m_penvelope = new envelope   set m_pcpoint = new point   m_penvelope.xmin =

65、 0   m_penvelope.ymin = 0   m_penvelope.xmax = 0   m_penvelope.ymax = 0   m_pcpoint.x = 0   m_pcpoint.y = 0   set m_plowerleft = new point   set m_plowerright = new point   set m_pupperleft = new point   set m_

66、pupperright = new point   update_props end sub private sub update_props()   set m_plowerleft = m_penvelope.lowerleft   edtllx.text = m_plowerleft.x   edtlly.text = m_plowerleft.y   set m_plowerright = m_penvelope.lowerright   edtlrx.text =

67、m_plowerright.x   edtlry.text = m_plowerright.y   set m_pupperleft = m_penvelope.upperleft   edtulx.text = m_pupperleft.x   edtuly.text = m_pupperleft.y   set m_pupperright = m_penvelope.upperright   edturx.text = m_pupperright.x  

68、0;edtury.text = m_pupperright.y end subienvelope接口的最值坐標(biāo)屬性xmax、xmin、ymax和ymin（讀寫，可以通過該屬性獲取或設(shè)置該邊框的四個頂點的坐標(biāo)）ienvelope接口的第五個方法union (inenvelope ) （方法，將參數(shù)輸入的幾何邊框和調(diào)用該方法的幾何邊框求并集，并將結(jié)果賦值給第一個邊框，即調(diào)用此方法的object）例子代碼：public sub t_envunion()   dim penv1 as ienvelope   dim penv2 as ienvelope 

69、;     set penv1 = new envelope   set penv2 = new envelope      penv1.putcoords 100, 100, 200, 200   penv2.putcoords 150, 150, 250, 250      penv1.union penv2      dim dxmin as double, dymin as double, dxma

70、x as double, dymax as double   penv1.querycoords dxmin, dymin, dxmax, dymaxend subienvelope接口的第六個方法union (inenvelope ) （方法，返回與輸入?yún)?shù)相交的區(qū)域的幾何邊框，并將結(jié)果賦值給第一個邊框，即調(diào)用此方法的object）例子代碼：' the example shows how to intersect 2 envelopes. the result is put in' the first envelope. public sub t_envi

71、ntersect()   dim penv1 as ienvelope   dim penv2 as ienvelope      set penv1 = new envelope   set penv2 = new envelope      penv1.putcoords 100, 100, 200, 200   penv2.putcoords 150, 150, 250, 250      

72、penv1.intersect penv2      dim dxmin as double, dymin as double, dxmax as double, dymax as double   penv1.querycoords dxmin, dymin, dxmax, dymax    if penv1.isempty then     msgbox "envelope is empty"   else   

73、  msgbox dxmin & "," & dymin & "," & dxmax & "," & dymax   end ifend subienvelope接口的第七個方法putcoords (xmin, ymin,xmax,ymax) （方法，將新建的一個邊框的4個極坐標(biāo)設(shè)置為輸入的參數(shù)）例子代碼：public function createenvxy(dblxmin as double, dblymin as double, _ 

74、;                           dblxmax as double, dblymax as double) as ienvelope   set createenvxy = new esrigeometry.envelope   createenvxy.putcoords dblxmin, dblymin, dblxmax, dblymaxend function

75、ienvelope接口的第八個方法querycoords (xmin, ymin,xmax,ymax)（方法，將已有的一個邊框的4個極坐標(biāo)輸出到參數(shù)當(dāng)中以備后用）ienvelope接口的第九個方法expand (dx, dy, asratio) （方法，按照輸入的dx與dy參數(shù)來放大或者縮小當(dāng)前的邊框，用與對arcmap窗體的中心放大或縮小，或者點擊屏幕獲得點擊點的坐標(biāo)，并將中心點設(shè)置成點擊點，并進(jìn)行一定比例的放大或者縮小）例子代碼：public sub t_envexpand()   dim penv1 as ienvelope   set penv1 = new envelope   penv1.putcoords 100, 100, 200, 200