Filter selbst bauen (ähnlich "esriGeoAnalysisStatsMean" u.a.

Hi,
das kleine ESRI-Beispielchen (kein halbe Seite lang) auf der Internetseite

http://resources.esri.com/help/9.3/ArcGISEngine/ar cobjects/esriGeoAnalyst/IRasterNeighborhood_SetWei ght_Example.htm

zeigt, wie man einen Filter mit "irregulärem" Kern ansprechen kann:

' Create the neighborhood object
Dim pNbr As IRasterNeighborhood
Set pNbr = New RasterNeighborhood

'Create array to specify neighborhood and wieghts
Dim evalues As Variant
Dim eval(2, 4)As Double 'implies you have set aside 3 x 5 "double positions"

eval(0, 0) = 3
eval(0, 1) = 0
eval(0, 2) = 0
eval(0, 3) = 0
eval(0, 4) = 4
eval(1, 0) = 0 ' the "weight" neighborhood is therefore
eval(1, 1) = 2 ' 3 0 0 0 4
eval(1, 2) = 0 ' 0 2 0 3 0
eval(1, 3) = 3 ' 0 0 1 0 0
eval(1, 4) = 0
eval(2, 0) = 0
eval(2, 1) = 0
eval(2, 2) = 1
eval(2, 3) = 0
eval(2, 4) = 0
evalues = eval

Dim lwidth As Long
Dim lheight As Long
lwidth = 5
lheight = 3

'Set the neghborhood
pNbr.SetIrregular lheight, lwidth, evalues

'Use neighborhood in sample function
Set pOutGDS = pOp.FocalStatistics (pInGDS, esriGeoAnalysisStatsMean, pNbr, True)

'ende

Leider funktioniert das nur mit den vorgefertigten Filterrechenvorschriften wie
esriGeoAnalysisStatsMean usw.

Kann man so eine "Rechenvorschrift" als Filter eigentlich auch selbst bauen?
Das dürfte ja eigentlich auch nur aus ein paar Laufvariablen für das ansprenen der Pixel und ein bis zwei Rechenoperationen sein sowie eine Ausgabe.

So was schonmal gemacht?

bye
Andi