So hoffe ich kann nun auch mal nen produktiven Beitrag bringen.
Problemstellung : Ich möchte nach einem Wert in einer Liste suchen und wenn dieser enthalten ist, möchte ich Position haben. Da ich keinen passenendes Posting gefunden habe und auch keine @Function die so etwas kann habe ich mir selber was gebaut und hoffe damit anderen weiter helfen zu können
_position := 0 ;
@For(_n := 1 ; _n < @Elements(_list) & _position = 0 ; _n := _n + 1 ; _position := @If(@Subset(@Subset(_list; _n); - 1) = _key ; _n ; 0));
Ich bitte um anregende Kritik
Gut dann hier das Upgrade dass , dir alle Positionen zurück gibt
@For(_n := 1 ; _n < @Elements(_list) ; _n := _n + 1 ;
_pos := @If(@Subset(@Subset(_list; _n); - 1) = _key ; _n ; 0);
@If(_pos != 0 ; _positions := _positions : @Text(_pos); ""));
Bitte um weitere Kritik
So bin auf Bernhards Kritik eingegangen
Hatte aber ein Problem mit der Zahlenliste, wenn diese leer ist, habe es nun folgendermaßen gelöst;
_positions := 0;
@For(_n := 1 ; _n < @Elements(_list) ; _n := _n + 1 ; _pos := @If(@Subset(@Subset(_list; _n); - 1) = _key ; _n ; 0);
@If(_pos != 0 ; _positions := _positions : _pos; ""));
_positions := @Subset(_positions; - (@Elements(_positions) - 1));
Läuft natürlich auf einen Fehler, wenn er gar Nichts findet
Deine Lösung hat, außer dem Fehler den du bereits nennst, wenn das gesuchte Element nicht enthalten ist, noch einen anderen Haken.
Stell doch an die letzte Stelle deiner Werteliste das gesuchte Element noch einmal und schau dir dann deine Positionen die du zurückbekommst an.
Wenn du nur das letzte Element hast bekommst du den Fehler beim Subset wieder. Wenn es in der Liste an anderer Stelle noch vorkommt entfällt bei deiner Lösung das letzte Element.
Eine funktionierende Lösung deines Problemes mit einem etwas anderen Ansatz schaut zum Beispiel so aus:
REM {Baue eine Zählerliste mit der gleichen Anzahl von Elementen};
@For(_i:=1;_i<= @Elements(fldListe);_i :=_i+1;_Counter := _Counter : @Text(_i));
REM {Verheirate beide Listen, einfache ConCat Operation (möglich weil die Anzahl der Elemente beider Listen gleich sein muss),};
REM {aber weil das erste Element der _Counter Liste leer ist mach da einen Trim außenrum, damit beide Listen gleich lang sind};
_ListeCount := @Trim(_Counter) + ":" + fldListe;
REM {Entferne aus der Liste alles was nicht dem gesuchten Wert entspricht und gebe nur den _Counter Teil zurück. Entferne alle leeren Elemente};
@Trim(@Transform(_ListeCount;"x";@If(@Word(x;":";2)=fldWert;@Word(x;":";1);"")))
Diesen Ansatz kann man übrigens mit wenigen Handgriffen so umbauen, das er dir die Positionen aller Elemente in der Liste zurückgibt, in denen dein gesuchter Wert auch nur teilweise enthalten ist.
Stell doch an die letzte Stelle deiner Werteliste das gesuchte Element noch einmal und schau dir dann deine Positionen die du zurückbekommst an.
Hmm passt bei mir, hier der Beispiel Code :
_pos := 0 ;
_positions := 0;
_list :="Eins" : "Zwei" : "Drei" : "Vier":"Eins" : "Zwei" : "Drei" : "Vier":
_key := "Vier";
@For(_n := 1 ; _n < @Elements(_list) ; _n := _n + 1 ; _pos := @If(@Subset(@Subset(_list; _n); - 1) = _key ; _n ; 0);
@If(_pos != 0 ; _positions := _positions : _pos; ""));
_positions := @Subset(_positions; - (@Elements(_positions) - 1));
@Prompt([Ok]; "Position" ; @Implode(@Text(_positions);"#"))
@For(_n := 1 ; _n < @Elements(_list) ; _n := _n + 1 ; ....
@For(_n := 1 ; _n <= @Elements(_list) ; _n := _n + 1 ;
gemacht habe