Domino 9 und frühere Versionen > Entwicklung

element aus textlist löschen [schonwieder]

<< < (3/6) > >>

Axel:
Hi,

das ist soweit richtig. Wieso willst du denn eigentlich das über Script machen? Wenn's in dem Button nur um das Löschen eines Wertes aus einer Liste geht, mach's am einfachsten mit der Formelsprache.

Damit müsste es funktionieren:

FIELD anzahl_alle := anzahl_alle;
neuetextliste := @Trim(@ReplaceSubstring(anzahl_alle;nummer; ""));
@SetField("anzahl_alle";neuetextliste)


Axel

KnoJo:
also das funktioniert.
ich würde es aber gerne über script sprache machen weil es für mich einfacher erscheint (als anfänger *g*)
denn ich hab noch ein weiteres mehrfachwerte feld. dies nummeriert sozusagen die einträge von anzahl_alle.
wenn ich jetzt aus anzahl_alle was lösche. bleiben die nummerierung gleich. aber es soll ja nicht so sein.

flaite:
Du kannst es ganz "zu Fuß" machen.
NotesItem des Objekts besorgen.
über .values iterieren.
Und einen neuen Array aufbauen.

so ungefähr:

--- Code: ---for all aVal in itFeld.values
if (trim$(aVal <> "")  then
arCounter = arCounter + 1
Redim Preserve newVals(arCounter)
newVals(arCounter) = aVal
end if
end forall

--- Ende Code ---
Axel

KnoJo:
na das is mir dann doch n bisl zu hoch *grml*

Axel:
Hi,

aus dem Kopf heraus ist mal folgender Lösungsansatz entstanden:


Dim doc As Notesdocument
Dim idx As Integer
Dim arrValue() As String
Dim varListe As Variant

...
...

'Löschen aus der Liste
varListe = Fulltrim(ArrayReplace(doc.anzahl_alle, doc.nummer(0), "")

'Dimensionierung des dyn. Arrays
Redim arrValue(Ubound(doc.anzahl_alle))

'Neu nummerieren
idx = 1
ForAll value in doc.anzahl_alle
  arrValue(idx-1) = idx
  idx = idx +1
End ForAll

'Wieder dem Feld zuweisen
doc.anzahl_alle = arrValue
...

Versuch's mal ob das so funktioniert.


Axel

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete