[QUOTE=sko1;1544226]D
Delphi-Quellcode:
var
res: TMatchcollection;
begin
// Pattern ist '^[a-zA-Z0-9$%&;\*\+\-/]{1,36}$'
res := TRegEx.Matches(AttributInhalt, pattern);
if res.count <> Length(Attributinhalt) then
...
begin
Wie ist AttributInhalt deklariert?
Mit dem Pattern '^[a-zA-Z0-9$%&;\*\+\-/]{1,36}$' kannst du nur eine Zeile prüfen.
Für einen größeren Text ist das Pattern Ungeeignet.
z.B.:
Code:
'WZ123456'
'1211234542' // Ergebnis Pattern gefunden res = 2
'WZ123456 1211234542' // Ergebnis Pattern nicht gefunden res = 0