Uma ajuda com expressões regulares no Delphi 10 por favor. Preciso verificar o seguinte numa string
:
- Tamanho variando no mínimo de 6 caracteres ao máximo de 20 caracteres;
- Tipo de caracteres: a-z ou A-Z ou 0-9 ou _ (caracter "underline");
- Os carateres permitidos podem estar em qualquer posição e em qualquer quantidade (até o limite da string, claro);
Exemplos
Strings VÁLIDAS:
AaaaaaaaBCCcc654_qq
1111s123AaBCcc654_qq
____ds4___xx
12345_123
Strings INVÁLIDAS:
12345-123 (tem hífen)
asdkdn 092834sdfdf (tem espaco em branco)
$123.0 (tem "$" e ".")
Tentei coisas como essas, mas não funcionaram:
var ret: TMatch;
begin
ret := TRegEx.Match(Edit1.Text, '([a-z]*[A-Z]*[0-9]*[-]?)', [roIgnoreCase]);
ou
ret := TRegEx.Match(Edit1.Text, '(\w*)', [roIgnoreCase]);
[^\w]|[\w]{21}
. Se alguma das duas condições foram atendidas, a string é inválida.[^\w]|[\w]{21}|^[\w]{6}$
^[\wàáâäãåąčćęèéêëėįìíîïłńòóôöõøùúûüųūÿýżźñçčšžÀÁÂÄÃÅĄĆČĖĘÈÉÊËÌÍÎÏĮŁŃÒÓÔÖÕØÙÚÛÜŲŪŸÝŻŹÑßÇŒÆČŠŽ∂ð']{6,20}$
e a demo de teste. Porém tem um jeito mais fácil de fazer isto, usar Unicode.\p{L}
para letras.