Themetabelle bearbeiten Hilfe

Gespeichert von Nicola am
im Forum ArcView 3.x classic
ICh habe ein Problem und komme nicht mehr weiter....
In der Thementabellen muss ich irgendwie alle GERADEN Zahlen rauslöschen können aber ich weiss nicht wie ich das anstellen soll kan mir hier jemand weiterhelfen???

Danke

Gespeichert von Maxilla am Fr., 15.10.2004 - 09:28

Permalink
Hier ein Script, dass dir gerade Integer selektiert. Du musst das entsprechende Feld selektieren:

theTab = av.GetActiveDoc
theVTab = theTab.GetVTab
theBitmap = theVTab.GetSelection
theBitmap.ClearAll

theFld = theTab.GetActiveField

Number.SetDefFormat("d.d")

for each rec in theVTab
theVal = theVTab.ReturnValue(theFld,rec)
if ((theVal/2).AsString.Right(1) = "0") then
theBitmap.Set(rec)
end
end

theVTab.UpdateSelection
Number.SetDefFormat("")

Jetzt kannst du mit dem FieldCalculator "0" oder "Number.MakeNull" eingeben.

Gespeichert von Gast am Fr., 15.10.2004 - 09:40

Permalink
Zum Selektieren kannst du auch direkt im Abfragemanager ([Feldname] mod 2 = 0) eingeben.

Gespeichert von Maxilla am Fr., 15.10.2004 - 09:45

Permalink
Hey, cool!

Gespeichert von Nicola am Fr., 15.10.2004 - 13:29

Permalink
Danke........

Bin weiter Gekommen....

Mein Chef hats noch etwas abgeändert sieht jetzt so aus:

TheView=av.getactivedoc
TheContourTheme=TheView.getactivethemes.get(0)

theFTab = TheContourTheme.getFtab

theBitmap = theFTab.GetSelection
theBitmap.ClearAll

thecontourfield = theFTab.findfield("Contour")

Number.SetDefFormat("d.d")

for each rec in theFTab
theVal = theFTab.ReturnValue(thecontourfield,rec)
if ((theVal/2).AsString.Right(1) = "0") then
theBitmap.Set(rec)
end
end

theFTab.UpdateSelection
Number.SetDefFormat("")

Gespeichert von Maxilla am Fr., 15.10.2004 - 13:49

Permalink
Entsprechend dem Vorschlag von "Gast" könntest du das Script noch derart verkürzen:

TheView=av.getactivedoc
TheContourTheme=TheView.getactivethemes.get(0)
theFTab = TheContourTheme.getFtab

theBitmap = theFTab.GetSelection
theBitmap.ClearAll

theFTab.Query("[Contour] mod 2 = 0",theBitmap,#VTAB_SELTYPE_NEW)

theFTab.UpdateSelection

Gespeichert von Nicola am Fr., 15.10.2004 - 14:36

Permalink
Danke