[*]Profan

Jörg
Sellmeyer

Yo behaupte veces: el Einarbeiten (con eigenen Worten sin simplemente el Texto a kopieren), es una unglaublicher Aufwand, el Roland alleine no schafft.
Einfach en el Ayuda hineinkopieren va no wegen Urheberschutzrecht.
Sich la página aber en el Rechner a ziehen, es una Aufwand de wenigen Augenblicken, el una auch para el Zukunft el Wissen sichert..

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

25.08.2015 ▲

H.Brill

Sombrero tal vez alguien todavía el Thema, el antes allem
el Fangvariablen anspricht, parat ?
Darüber hatte letztes Jahr P.Pájaro carpintero en Paules Foro
una todo Página geschrieben. Yo finde lo bloß no
mehr y había lo vergessen en PC a speichern.

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.

XProfan X2
WinXP, SP3, Core(TM) i7-3770 @ 3.40GHz

¿Te ha dies hier? [...]

H.Brill

Gracias, sí el war lo en etwa.
Aunque hatte p.specht später en un
otro Hilo una todo Página, incluso
con Beispielen, geschrieben.

Aber el hilft me auch ya más.

Michael
W.

LOL, una Draufblick y lo se algo klarer.
En RegEx heißt lo simple backreference.

In el Teil, el Roland nutzt son 9 Backreferences posible. Und sí, ellos greifen se el qué en runden Klammern es.
Se puede also con un RegEx a a 9 Teile de una gefunden String herausfiltern.

Das muß allerdings entonces auch umgesetzt voluntad. Yo glaube, el Roland hier todavía nichts instalado ha.

El Library bietet todavía algunos Teile mehr. Aunque fehlen auch Teile en el Library, z.B. Lookarounds son no enthalten.

System: Windows 8/10, XProfan X4
Programmieren, das spannendste Detektivspiel der Welt.

H.Brill

Obwohl Yo hiermit no tan correcto klarkomme:
Kompilieren Marca Separación

print Match$("([0-9]{1,2})~2","abcdef11gghijklmnopqrst22uuvwxyzz")

Hier Yo quería el 22 hinter st abgreifen. Mache Yo
como qué falso ?

PS:
Sí, Yo denke auch, daß Roland el reg. Ausdrücke
sólo muy rudimentär (teilweise) implementiert ha.
Como fehlt todavía einiges, qué auch durchaus brauchbar wäre.

Was auch todavía necesariamente rein müßte :
Kompilieren Marca Separación

Print SubStr$("XXX8:20xxx15:00YYYYY20:00yyyyy", 2, "[0-9]{1,2}:[0-9]{1,2}")

Daß uno hier z.B. el 2. Uhrzeit abgreifen podría.
Auch Len(S, [D]) wäre evtl. una Kandidat. Wenn D auch
con reg. Ausdrücken trabajo podría.

Wenn uno con el reg. Ausdrücken veces angefangen ha,
möchte uno ellos irgendwann no mehr missen.

Michael
W.

a 22:
Hierfür braucht uno el Backreferences no, el va con einfachem RegEx. Das innerhalb el runden Klammern reicht - sin la runden Klammern. Lo heißt: 1 a 2 Ziffern.
Kompilieren Marca Separación

Cls
Declare RegExMaske$, SuchText$, StartPos&, Treffer&
Declare savePos&, saveLen&, saveTxt$
Set("RegEx",1)
RegExMaske$ = "[0-9]{1,2}"
SuchText$ = "abcdef11gghijklmnopqrst22uuvwxyzz"
StartPos& = 0
Treffer& = 0
Print SuchText$

While InStr(RegExMaske$, SuchText$, StartPos&) <> 0

    savePos& = %MatchPos
    saveLen& = %MatchLen
    saveTxt$ = $Match
    Inc Treffer&
    Print "  gefunden: \q";saveTxt$;"\q, Posi:",savePos&+StartPos&;", Länge:",saveLen&;", Treffer:",Treffer&
    Inc StartPos&, savePos& + saveLen&

EndWhile

Print "ENDE"
WaitEnd

...y el otro hecho se doch auch de incluso.

Yo simplemente veces el Texto y el RegEx ersetzt. Den Rest macht entonces el Programmierer así, como lo haben möchte.
Kompilieren Marca Separación

Cls
Declarar RegExMaske$, SuchText$, StartPos&, Treffer&
Declarar savePos&, saveLen&, saveTxt$
Conjunto("RegEx",1)
RegExMaske$ = "[0-9]{1,2}:[0-9]{1,2}"
SuchText$ = "XXX8:20xxx15:00YYYYY20:00yyyyy"
StartPos& = 0
Treffer& = 0
Imprimir SuchText$

Mientras que InStr(RegExMaske$, SuchText$, StartPos&) <> 0

    savePos& = %MatchPos
    saveLen& = %MatchLen
    saveTxt$ = $Match
    Inc Treffer&
    Imprimir "  gefunden: \q";saveTxt$;"\q, Posi:",savePos&+StartPos&;", Longitud:",saveLen&;", Treffer:",Treffer&
    Inc StartPos&, savePos& + saveLen&

EndWhile

Imprimir "ENDE"
WaitEnd

System: Windows 8/10, XProfan X4
Programmieren, das spannendste Detektivspiel der Welt.

Michael
W.

H.Brill (30.08.15)

Hier Yo quería el 22 hinter st abgreifen.

Dafür wären entonces el Lookaraunds otra vez bien (gibt's aber todavía no):
Kompilieren Marca Separación

RegExMaske$ = "(?<=st)[0-9]{1,2}:[0-9]{1,2}"

XProfan X3
System: Windows 8/10, XProfan X4
Programmieren, das spannendste Detektivspiel der Welt.

H.Brill

Gracias, con Bucle es ya klar.
tal vez läßt se Roland sí todavía qué einfallen.
Wäre sólo schön, si auch sin Bucle
ir sería.

Como steckt sí todavía jede Menge Potential detrás de él.
Noch así unos pocos Ideen :
- Conjunto("RegEx", 2)
Como lo esta Lib auch para Utf-8 para Delphi son,
wäre una Umschalten en el Unicode-Lib
auch no schlecht. Como entfiele entonces el
vorherige Konvertieren des Cuerdas.
- Container-Función RegEx(....)
Damit podría uno z.B. el Modifikatoren
beeinflussen. Damit sähen auch así manche
Suchmuster no mehr así kryptisch de, si
uno ellos sonst 'on the fly' übergibt.