[*]Profan

Jörg
Sellmeyer

je behaupte la fois: cela Einarbeiten (avec eigenen Worten sans simple den Text trop kopieren), est un unglaublicher Aufwand, den Roland alleine pas schafft.
simple dans qui Aider hineinkopieren allez pas à cause de Urheberschutzrecht.
Sich qui page mais sur den calculateur trop tirer, est un Aufwand de wenigen Augenblicken, qui einem aussi pour qui Zukunft cela savons sichert..

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

25.08.2015 ▲

H.Brill

Hat peut-être quelqu'un encore cela Thema, cela avant allem
qui Fangvariablen anspricht, prêt ?
par-dessus hatte l'année dernière P.Specht dans Paules Forum
une ganze page geschrieben. je trouve es bloß pas
plus et hatte es oublier qc sur PC trop Sauver.

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

Avez- Du ca ici? [...]

H.Brill

merci, oui cela était es dans etwa.
Allerdings hatte p.specht später dans einem
anderen Fil une ganze page, sogar
avec Beispielen, geschrieben.

mais cela hilft mir aussi déjà plus.

Michael
W.

LOL, un Draufblick et es wird quelque chose klarer.
chez RegEx est cela simple backreference.

dans dem partie, cela Roland utilise sommes 9 Backreferences possible. et oui, vous greifen sich cela quoi dans runden Klammern ist.
il peut alors avec einem RegEx jusque 9 Teile aus einem trouvé String herausfiltern.

cela doit allerdings ensuite aussi mise en œuvre volonté. je crois, cela Roland ici encore rien incorporé hat.

qui Library bietet encore quelques Teile plus. Allerdings manquer aussi Teile dans qui Library, z.B. Lookarounds sommes pas enthalten.

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

H.Brill

quoique je hiermit encore pas so richtig klarkomme:
Kompilieren Marque Séparation

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

ici voulais je qui 22 derrière st abgreifen. fais je
là quoi faux ?

PS:
oui, je denke aussi, qui Roland qui reg. Ausdrücke
seulement très rudimentär (partiellement) implementiert hat.
là fehlt encore einiges, quoi aussi durchaus brauchbar wäre.

quoi aussi encore absolument rein devrait :
Kompilieren Marque Séparation

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

sofern on ici z.B. qui 2. l'heure abgreifen pourrait.
aussi Len(S, [D]) wäre peut-être. un candidat. si D aussi
avec reg. Ausdrücken travailler pourrait.

si on avec den reg. Ausdrücken la fois angefangen hat,
voudrais on vous irgendwann pas plus missen.

Michael
W.

trop 22:
Hierfür braucht on qui Backreferences pas, cela allez avec einfachem RegEx. cela dedans qui runden Klammern reicht - sans qui runden Klammern. Es est: 1 jusqu'à 2 Les chiffres.
Kompilieren Marque Séparation

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

...et l'autre erledigt sich doch aussi de selbst.

je hab simple la fois den Text et cela RegEx ersetzt. Den reste pouvoir ensuite qui Programmierer so, comment il es avons voudrais.
Kompilieren Marque Séparation

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

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

    savePos& = %MatchPos
    saveLen& = %MatchLen
    saveTxt$ = $Match
    Inc Treffer&
    Imprimer "  trouvé: \q";saveTxt$;"\q, Posi:",savePos&+StartPos&;", Longueur:",saveLen&;", Treffer:",Treffer&
    Inc StartPos&, savePos& + saveLen&

Endwhile

Imprimer "ENDE"
WaitEnd

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

Michael
W.

H.Brill (30.08.15)

ici voulais je qui 22 derrière st abgreifen.

Pour cette wären ensuite qui Lookaraunds wieder bien (gibt's mais encore pas):
Kompilieren Marque Séparation

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

merci, avec Boucle ist es déjà bien sûr.
peut-être läßt sich Roland oui encore quoi envahir.
Wäre arrêt joli, si es aussi sans Boucle
aller serait.

là steckt oui encore chacun la quantité Potential derrière elle.
encore so un paire idées :
- Set("RegEx", 2)
là es cet Lib aussi pour Utf-8 pour Delphi gibt,
wäre un commuter sur qui Unicode-Lib
aussi pas mal. là entfiele ensuite cela
vorherige Konvertieren des Cordes.
- Container-Funktion RegEx(....)
avec cela pourrait on z.B. qui Modifikatoren
beeinflussen. avec cela sähen aussi so manche
Suchmuster pas plus so kryptisch aus, si
on vous sonst 'on le fly' übergibt.