Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by GPRSNerd,
22. Jun 2009
Jau, jetzt geht wieder alles. :thumb:
Da sieht man wie wichtig Unittests sind bei so komplexen Funktionen! (benutze ich aber auch noch nicht so lange :angel2: ).
Danke für deinen Code (und deine Geduld mit meinen Nörgeleien :wink: )!
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by GPRSNerd,
22. Jun 2009
Hi,
besser, aber immer noch nicht auf dem guten Stand vor deinen Änderungen!
Folgende Tests schlagen immer noch fehl, größtenteils im zusammenhang mit Escaping:
Assert(MatchText('te\*23', 'te023')=false);
Assert(MatchText('te\?23', 'te023')=false);
Assert(MatchText('te\|23', 'te023')=false);
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by GPRSNerd,
22. Jun 2009
Sorry, aber deine Funktionen liefern nur noch TRUE zurück.
Folgende Unittests schlagen alle fehl (liefern TRUE, anstatt FALSE):
Assert(MatchString('test*23', 'test012', )=false);
Assert(MatchString('test?23', 'test0123', )=false);
Assert(MatchString('test*23?56*9', 'test01234a6789', )=false);
Assert(MatchString('tEst*23', 'TEst0123', )=false);
Assert(MatchText('te\*23',...
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by GPRSNerd,
22. Jun 2009
Jau, bin ich blöd/blind!
MatchText und MatchString.
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by GPRSNerd,
22. Jun 2009
Hi himitsu,
danke für den upgedateten Code.
Irgendwie kann ich den dritten Parameter-Set für die Flags nicht benutzen.
Delphi 2009 bietet mir in der Codevervollständigung immer nur die Varianten mit den zwei Parameters Mask und S an.
Wenn ich ein Set als dritten Parameter hinzufüge, gibt der Compiler die Fehlermeldung "Zu viele Parameter" aus.
Irgendne Ahnung, was ich hier falsch...
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by GPRSNerd,
8. Mai 2009
Unter D2009 laufen in der String-Variante alle meine Unittests einwandfrei durch! :thumb:
Danke himitsu für den Code.
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by GPRSNerd,
7. Mai 2009
Hi himitsu,
die Escaped-Sourcen in Post#15 laufen schon ganz gut.
Der Escape von | funktioniert noch nicht so ganz:
MatchText('te\|23', 'te|23', false)
ist FALSE.
Danke für deine Mühe,
Stefan
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by GPRSNerd,
7. Mai 2009
Vergiss den Edit, mein Fehler! Ich habe test123 auf te?23 geprüft. Copy&Paste-Error!
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by GPRSNerd,
7. Mai 2009
@himitsu: Du hast in den neuen Version die Escape-Möglichkeiten für ? und * nicht implementiert, oder?
Matchtext('te\*23', 'te*23', false)
ergibt FALSE.
Edit:
Matchtext('te?23', 'te123', false)
ergibt auch FALSE.