Announcement

Collapse
No announcement yet.

RegEx mit JEDI

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • RegEx mit JEDI

    Hallo,

    ich habe folgenden Code erstellt um mit der JEDI-Bibliothek mit Hilfe von RegEx String zu prüfen. Weiß jemand wo der bzw. die Fehler im folgenden Code sind?
    Als Ergebnis kommt immer 0.
    Code:
    program Project1;
    {$APPTYPE CONSOLE}
    uses
      sysutils,JclUnicode;
    
    var
      t: TURESearch;
      wstrText: WideString;
      wstrPattern: WideString;
      wstrListe: TWideStringList;
    begin
      wstrText    := '123abc';
      wstrPattern := '[0-9a-z]*';
      wstrListe := TWideStringList.Create;
      wstrListe.Add(wstrText);
      t := TURESearch.Create(wstrListe);
      t.FindPrepare(wstrPattern,[]);
      writeln(IntToStr(t.Count));
      t.Free;
      wstrListe.Free;
      readln;
    end.
    Vielen Dank schon im Vorraus.

  • #2
    Ich kenne diese RegEx nicht, aber mir erscheint ein "find...." nicht richtig. Dein Ausdruck ergibt mit

    2424#wrewr

    normalerweise 2 Fundstellen; nämlich 2424 und wrewr. Was du ja eigentlich willst, ist ein matchen. Vielleicht dahingehend prüfen.

    Was soll count zurückgegeben?

    Weiterhin kann die ganze Engine mit einer Liste bestückt werden? Dann werden alle abgearbeitet? Wo erkenne ich dann Treffer? Ev. bedeutet dann t.count der 0. in der Liste?
    Christian

    Comment

    Working...
    X