Hilfe bei regulärem Ausdruck

[rolaf]

@edel: Gut dass Du erwähnt hast, dass dafür PB5.3 gebraucht wird

Habe 5.22 LTS und ExamineRegularExpression() ist keine Funktion bei mir... Du und Kiffi benutzt die Funktion aber. Irgendwas stimmt doch hier nicht...

@edel: Gut dass Du erwähnt hast, dass dafür PB5.3 gebraucht wird

Du brauchst dafür 5.30 um die Funktion nutzen zu können.

Hat schon einer erwähnt das dafür Version 5.3 benötigt wird?

[Tommy]

Ich finde die Hausfrauenlogik besser und verständlicher und wartbarer und lesbarer und hübscher.
Man sieht die Abfrage und fertig und
man weiss was das genau bedeutet. Bei regex muss man jedes Mal genauer hinschauen und Gehirnschmalz und mehrere Minuten verschwenden um dann zu kappieren was das genau macht.
Is für mich Zeitverschwendung. Ausserdem sieht das kacke aus.
Derren: Bei mir meckert er nicht.
Es könnte sein das du noch 5.22 und nicht 5.30 hast.

[Derren]

Das hab ich mir schon gedacht. Mich hat Bisonte's Beitrag verwirrt. Denn er hat die Funktion ja selber benutzt und auch nicht erwähnt, dass man dafür die Beta 5.3 braucht^^

[NicTheQuick]

Moment mal. Das geht doch erst mit 5.30, oder?

[CodeCommander]

Jap das geht erst mit 5.30.

[edel]

Das hab ich mir schon gedacht. Mich hat Bisonte's Beitrag verwirrt. Denn er hat die Funktion ja selber benutzt und auch nicht erwähnt, dass man dafür die Beta 5.3 braucht^^

Stimmt, ist uns gar nicht aufgefallen. Dann weiss ich aber auch nicht, was Bisonte uns damit sagen wollte

[Bisonte]

Stimmt, ist uns gar nicht aufgefallen. Dann weiss ich aber auch nicht, was Bisonte uns damit sagen wollte

Nun habt ihr es geschafft... nun weiss ich das auch nicht mehr

[Nino]

Der Vollständigkeit halber:
Bei PB-Versionen vor 5.30 geht das auch noch anders als mit ImportC usw., und zwar unter Verwendung von positive lookaround, d.h. (?<=...) und (?=...);
dann ExtractRegularExpression() benutzen.

Code: Alles auswählen

Define MeinString.s

MeinString + "" + #CRLF$
MeinString + "SchluesselWort(" + Chr(34) + "DasHierBraucheIch_1" + Chr(34) + ") ; evtl. ein Kommentar" + #CRLF$
MeinString + "  SchluesselWort(" + Chr(34) + "DasHierBraucheIch_2" + Chr(34) + ")" + #CRLF$
MeinString + "; SchluesselWort(" + Chr(34) + "DasHierBraucheIch_3" + Chr(34) + ")" + #CRLF$
MeinString + "  ; SchluesselWort(" + Chr(34) + "DasHierBraucheIch_4" + Chr(34) + ") ; evtl. ein Kommentar" + #CRLF$
MeinString + "" + #CRLF$

If CreateRegularExpression(0, "(?<=[\s*][^\S]SchluesselWort\(" + Chr(34) + ").*?(?=" + Chr(34) + "\))", #PB_RegularExpression_MultiLine | #PB_RegularExpression_NoCase)
   Dim Result$(0)
   n = ExtractRegularExpression(0, MeinString, Result$())
   For i = 0 To n-1
      Debug Result$(i)
   Next   
Else
   Debug "Error"
EndIf