Forum: Object-Pascal / Delphi-Language
Delphi
by kng,
3. Sep 2008
Naja ich verwende einfach die TRegExprEx Komponente von dieser Seite mit dem Ausdruck "+".
Das Laden der Datei war in den 3 Sekunden allerdings nicht miteinbezogen, trotzdem schnell genug für meine Zwecke.
Forum: Object-Pascal / Delphi-Language
Delphi
by kng,
3. Sep 2008
Wenn ich das mache, bekomme ich bloß die Meldung "The dawg run out of space.".
//Diese Meldung bekomme ich auch bei Dateien ab 10 MB, wie kann das sein?
Forum: Object-Pascal / Delphi-Language
Delphi
by kng,
3. Sep 2008
Bei einem Test mit einer 122 MB großen Datei und den Zeichen a-z, A-Z, 0-9 dauerten omata's und deine Prozedur ~ 8 Sekunden.
Mit einem Regulären Ausdruck ~ 3 Sekunden.
Forum: Object-Pascal / Delphi-Language
Delphi
by kng,
3. Sep 2008
Hab die ganze Prozedur jetzt mit einem regulären Ausdruck abgedeckt.
Trotzdem Danke an alle. :zwinker:
Forum: Object-Pascal / Delphi-Language
Delphi
by kng,
2. Sep 2008
Hallo Leute,
Ich habe mir folgende Prozedur geschrieben, welche alle Wörter in einem bestimmten Charset aus einem Text extrahiert.
type
SetOfChar = Set of Char;
procedure ExtractWords(const AText: string;
AMinLength, AMaxLength: Integer;
AAllowedChars: SetOfChar;