Latest Contributions by DemetrisDemetriou

‎10-02-2011

I have a DLL script that launches a window where the user should may do the following selections: an input file, a field name, select between 2 option buttons and an output file name. However, I need to run this DLL via a VBA and ArcObjects code so as the user will not see the window of the DLL tool and the above selections will be given automatically within a loop so as to take various output files. Is that possible? Please help. Thanks Demetris

‎09-27-2011

I have the following 2 questions: 1.Does anybody know if I may find the cost allocation algorithm in VBA and ArcObjects? The reason is that I want to do a similar task i.e. allocate space so I need to do some adjustments. 2. Why when I use the cost allocation function of Spatial Analyst, space is allocated not in all input source locations as shown in attached image. In particular, the input raster has 18 spots while the cost functions allocates 14 spaces.Can I impose the function to allocate space in all input source locations? and how? Thanks Demetris

‎05-30-2011

Thanks for the answer. However, I suppose I have just to select the polygon first and then use that code? Deme

‎05-29-2011

Hi. I have a feature layer with land parcels. Each parcel is a polygon. So, I want to calculate the perimeter of each polygon using VBA and ArcObjects. Is there any property in any ArcObjects Interfece in order to just read it? Any help please? Thanks Deme

‎05-17-2011

A general comment I would like to do is that the previous kind of forum with the point system awarding to those answered questions was a perfect system in terms of supporting people dealing with ArcObjects Programming. Also, the fact that this forum refers in all development languages is another disadvantage. In conclusion, my view is that this new forum system is not effective and I wonder how ESRI took these decisions and does not do anything to improve this system. You may see that in most questions rarely there is an answer or even a discussion. I hope that this positive critique will be taken into account by ESRI and if you agree please add in this post your views. Regards Demetris

‎05-15-2011

Hi. I work with a raster set representing land values and I would like to automatically create polygons with random shape but with certain size and/or land value given a centroid point of each polygon. The centroid point will act as the initial raster cell (a pixel called as a seed cell) that will belong in that certain polygon and then a region growing algorithm will begin adding pixels around a centroid pixel until the constraint of size and/or land value of a polygon will be satisfied. Is anybody who has any idea about an existing region growing algorithm? or at least which is the class of ArcObjects or Interfaces that I may work with, so as to read the value of each pixel, create a new polygon by adding new pixel to it? I hope that the above make sense and somebody may help me. I will appreciate it vey much. Deme

‎01-14-2011

Dear Duncan, I adjusted your the VBA's sample in my code as shown below but nothing works either with True or False. Could you understand why? Thanks Demetris Public Sub Test6() Dim pMxDoc As IMxDocument Set pMxDoc = ThisDocument 'Get the active map (data frame) Dim pMap As IMap Set pMap = pMxDoc.FocusMap Dim pTableCollection As ITableCollection Set pTableCollection = pMap 'Find the "Rankingtable" Dim i As Integer Dim pDataSet As IDataset Dim pRankingTable As ITable Dim blnFoundTable As Boolean blnFoundTable = False For i = 0 To pTableCollection.TableCount - 1 Set pRankingTable = pTableCollection.Table(i) Set pDataSet = pRankingTable 'QI If pDataSet.Name = "RankingTable" Then blnFoundTable = True Exit For End If Next i If blnFoundTable = False Then MsgBox "Table not loaded in the data frame" Exit Sub End If Dim pTable As ITable Set pTable = pRankingTable Dim pTableSort As ITableSort Set pTableSort = New esriGeoDatabase.TableSort With pTableSort Set .Table = pRankingTable Set .QueryFilter = Nothing .Fields = "R_Order" .Ascending("R_Order") = False ' TRUE is ascending, if set to FALSE then descending .Sort Nothing End With End Sub Demetris, See sample VBA code below on how to get a descending sort order. Duncan Public Sub Test() Dim pTable As ITable Set pTable = FindTableInMap("Downstream_Polylines") Dim pTableSort As ITableSort Set pTableSort = New esriGeoDatabase.TableSort With pTableSort Set .Table = pTable Set .QueryFilter = Nothing .Fields = "OBJECTID" .Ascending("OBJECTID") = True ' TRUE is ascending, if set to FALSE then descending .Sort Nothing End With Dim pCursor As ICursor Set pCursor = pTableSort.Rows Dim pRow As IRow Set pRow = pCursor.NextRow Do While Not pRow Is Nothing Debug.Print pRow.Value(0) Set pRow = pCursor.NextRow Loop End Sub

‎01-13-2011

I noticed that the ItableSort interface has only an ascending property. How can I sort a table based on a field but in descending order? I work with VBA and ArcObjects. Thanks Deme

‎06-12-2010

Thanks, but my problem is how to get the max index number (i.e.10,11 etc.) among a series of file names e.g. table10.dbf, table11.dbf etc. Deme

‎06-12-2010

Hi. I would like to programmatically rename an existing dbf table or a feature layer based on its existing name. For example if the name is table.dbf the new name will be table1.dbf and then if the existing table name is table1.dbf rename it to table3.dbf and so on. Similalry, for a feauture class. Any help please? Thanks Deme

Online Status	Offline
Date Last Visited	‎11-11-2020 02:23 AM

My Ideas

Latest Contributions by DemetrisDemetriou

Call a DLL script from VBA and ArcObjects code

Cost allocation algorithm

Re: Calculate the perimeter of a polygon

Calculate the perimeter of a polygon

The usefulness of this forum

Looking for a region growing algorithm

Re: How to sort a field in a dbf table in descending order?

How to sort a field in a dbf table in descending order?

Re: Programmatically rename a table and a layer in VBA

Programmatically rename a table and a layer in VBA