XProfan

Español

Erasmus.Herold

Hallöchen ...

Gibt lo en xProfan una Befehl / una Función, con el Soy un
String en erlaubte Signo prüfen kann?

Z.B., si "name$" sólo de "a....z", "A...Z","0...9", "_" besteht?

Gracias para el passenden Tipp.

09.01.2019 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

H.Brill

Gibt no, aber el kannst du con el regulären Ausdrücken
auch selber rápidamente realisieren.

Kompilieren Marca Separación

Declarar String texto
CLS
Conjunto("RegEx", 1)
texto = "1234abc567"

If TesteString(texto) = 1

    Imprimir "Unerlaubtes Signo gefunden !"

Más

    Imprimir "Alles OK !"

EndIf

Proc TesteString

    Parámetros String s
    Declarar Largo fehler
    fehler = 0

    WhileLoop 1, Len(s)

        If Instr("[a-zA-Z0-9_]", Mid$(s, &LOOP, 1))

            ' alles es bien

        Más

            fehler = 1
            Romper

        EndIf

    EndWhile

    Volver Fehler

ENDPROC

WaitKey
Conjunto("RegEx", 0)
End

Wenn lo a Geschwindigkeit mangelt, puede ser auch todavía
el MOVELISTPROC bemühen. Dann mußt du sólo el Zähler
para Mid$() selber con un Largo/Int erzeugen y selber
hochzählen. Dazu nimmst du Move("StringToList", S, D).
Aber vorher hinter cada Signo una Trenner einfügen.

Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.

09.01.2019 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Erasmus.Herold

Dankeschön - perfekt!

13.01.2019 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita