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.
Vielen Dank schon im Vorraus.
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.
Comment