Domino 9 und frühere Versionen > ND8: Entwicklung
führende "0" aus Textfeld entfernen
udo187:
Hallo !
Noch eine kleine Korrektur:
- Wenn nur eine Stelle eingegeben wird
- x ist kleiner oder gleich der Länge
@If(test1 = "0";@Return("");@Success);
@For(x := 1 ; x <= @Length(test1) ; x := x + 1;
@If(
@Right(@Left(Test1;x);1) = "0";
@Success;
@return(@Right(test1;@Length(test1) - (x-1)))
)
)
Gruss
Udo
pram:
--- Zitat von: cebolina am 17.12.13 - 10:31:27 ---
--- Zitat von: pram am 17.12.13 - 10:09:58 ---wieviele 0en können vorkommen?
--- Ende Zitat ---
soviele wie der User einträgt ;-) - also unbekannt.
--- Ende Zitat ---
Klar ;)
Mach dann auch noch einen Trim, nicht dass ein User " 00012345" eingibt
cebolina:
@Udo
Danke für den ergänzenden Hinweis.
Die Erfassung von "0" ist zwar sehr unwahrscheinlich, aber man weiß ja nie.
@pram
Trim ist eh schon dabei, aber Danke für den Hinweis.
Stefan
Tim Pistor:
Auch noch was
--- Code: ---p := "~";
v := @ReplaceSubstring(@Trim(@ThisValue); p; "");
@While( @Begins( v ; "0" ) ; v := @RightBack( p + v; p + "0"));
v
--- Ende Code ---
Edit: "p" ist ein beliebiges Zeichen das bei der Eingabe nicht vorkommen darf und rausgefiltert wird.
cebolina:
--- Zitat von: Tim Pistor am 17.12.13 - 12:09:29 ---Auch noch was
--- Code: ---p := "~";
v := @ReplaceSubstring(@Trim(@ThisValue); p; "");
@While( @Begins( v ; "0" ) ; v := @RightBack( p + v; p + "0"));
v
--- Ende Code ---
Edit: "p" ist ein beliebiges Zeichen das bei der Eingabe nicht vorkommen darf und rausgefiltert wird.
--- Ende Zitat ---
Sehr elegant!
Stefan
Navigation
[0] Themen-Index
[#] Nächste Seite
[*] Vorherige Sete
Zur normalen Ansicht wechseln