It looks like you're new here. Sign in or register to get started.
CustSpecChar := '`*|~*|!*|@*|#*|$*|%*|^*|&*|(*|)*|_*|-*|+*|=*|{*|[*|}*|]*|\*|:*|;*|<*|,*|>*|.*|?*|/*|0*|1*|2*|3*|4*|5*|6*|7*|8*|9*'; SETFILTER("Name",CustSpecChar);
Customer.SETFILTER(Name,'<>%1',''); IF Customer.FINDSET THEN REPEAT ASCIIValue := Customer.Name[1]; Customer.MARK((ASCIIValue < 65) OR ((ASCIIValue > 90) AND (ASCIIValue < 97)) OR (ASCIIValue > 122)); UNTIL Customer.NEXT = 0; ...
Comments
..A|Z..
http://www.BiloBeauty.com
http://www.autismspeaks.org