>Any suggestions on how I can quickly alltrim all non-alpha chars from a string via either a clever VFP technique, FoxTools FLL function, or Win32 API call?
>
>My current approach below. But certainly there must be a more efficient way?
>
>NOTE: I want to preserve embedded non-alpha chars. I just want to remove leading and trailing non-alpha chars.
>
>

>function fulltrim( pcStr )
>	for lnChar = 1 to len( pcStr )
>		if isalpha( substr( pcStr, lnChar, 1 ) )
>			exit
>		endif
>	endfor
>	pcStr = substr( pcStr, lnChar )
>
>	for lnChar = len( pcStr ) to 1 step -1
>		if isalpha( substr( pcStr, lnChar, 1 ) )
>			exit
>		endif
>	endfor
>	pcStr = left( pcStr, lnChar )
>
>	return pcStr
>endfunc
>

>
>Thanks,
>Malcolm


z="ABC123"
?CHRTRAN(z,CHRTRAN(z,"ABCDEFGHIJKLMNOPQRSTUVWXYZ",""),"")

Just add lower case if you need to include those, too.