[Code] Delphi RegEx

Dieses Thema im Forum "Programmierung & Entwicklung" wurde erstellt von Mahjong, 16. Januar 2009 .

Schlagworte:
Status des Themas:
Es sind keine weiteren Antworten möglich.
  1. Diese Seite verwendet Cookies. Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies. Weitere Informationen
  1. #1 16. Januar 2009
    Delphi RegEx

    Hi,

    Ich habe schon relativ lange nichts mehr mit Delphi gemacht und bräuchte dringend RegEx Funktionen.
    Es geht darum Strings nach RegEx aus einem String zu extrahieren.

    Google sowie Delphi Forum bieten irgendwie nur Lösungen zu wesetlich komplexeren Dingen.

    Wäre sehr nett :)
     

  2. Anzeige
  3. #2 16. Januar 2009
    AW: Delphi RegEx

    Schau mal auf dieser Seite mal die Beispile an, müsste in Delphi übertragbar sein.

    Mfg Rushh0ur
     
  4. #3 16. Januar 2009
    AW: Delphi RegEx

    Uhm ich behersche RegEx ;). Es geht darum wie RegEx Funktionen in Delphi verwendet werden.
     
  5. #4 16. Januar 2009
    AW: Delphi RegEx

    Aso, hab dich Falsch verstanden.
    Hier findest du eine Delhpi Free-Komponente Namens TRegExpr:
    http://regexpstudio.com/TRegExpr/TRegExpr.html

    Zum Benutzen einfach die Komponente (RegExpr.pas) in den jeweiligen Projektordner kopieren
    und in die Uses-Section einbinden (RegExpr), danach kann diese im Projekt benutzt werden.

    Hier ein Beispiel der funktionsweise: (Weitere Details in der Hilfe)
    Code:
    [B]var [/B]RegEx: TRegExpr;
     S : [B]String[/B];
    
    [...]
    
     S := NullAsStringValue;
     RegEx:= TRegExpr.Create; [COLOR="Blue"]// Componente erstellen[/COLOR]
     [B]try[/B]
     [COLOR="Blue"]// Ausdruck hinzufügen[/COLOR]
     RegEx.Expression := '[_a-zA-Z\d\-\.]+@[_a-zA-Z\d\-]+(\.[_a-zA-Z\d\-]+)+';
     [COLOR="Blue"]// Ausdruck Anwenden bei erfolgsfall Resultate Prüfen[/COLOR]
     [B]if [/B]RegEx.Exec('My e-mails is user@unknow.net and admin@unknow.net') [B]then[/B]
     [B]begin[/B]
     [COLOR="Blue"]// Alle Resultate in ein String zussamenfassen[/COLOR]
     [B]repeat[/B]
     S := S + RegEx.Match [0] + ', ';
     [B]until not[/B] RegEx.ExecNext;
     [COLOR="Blue"] // Ergebniss Ausgeben[/COLOR]
     ShowMessage(S);
     [B]end[/B];
     [B]finally[/B]
     RegEx.Free; [COLOR="Blue"]// Componente freigeben[/COLOR]
     [B]end[/B];
    
    Mfg Rushh0ur
     
  6. #5 16. Januar 2009
    AW: Delphi RegEx

    Vielen Dank :) BW ist raus
     

  7. Videos zum Thema
Die Seite wird geladen...