Tirar Simbolos de uma string...
04/04/2003
0
Fala bando!!!
como eu faço para tirar as os simbolos de dentro de uma string e deixar soh
os numeros?
tipo: tenho a uma string com o valor 3213-321/6546(3) e quero que fique soh
321332165463 !
Soh tem um detalhe... quero fazer isto em um campo de um bd que pode ter os
simbolis em qquer posição, então tem que ser um jeito que funcione para
qquer string. tipo... tanto se o valor for 3213-321/6546(3) quanto se o
valor for 32/13321-654-63, o valor retornado deverá ser: 321332165463
Como eu posso fazer?
Aquele Abraço!!!
Tiago Farinon
como eu faço para tirar as os simbolos de dentro de uma string e deixar soh
os numeros?
tipo: tenho a uma string com o valor 3213-321/6546(3) e quero que fique soh
321332165463 !
Soh tem um detalhe... quero fazer isto em um campo de um bd que pode ter os
simbolis em qquer posição, então tem que ser um jeito que funcione para
qquer string. tipo... tanto se o valor for 3213-321/6546(3) quanto se o
valor for 32/13321-654-63, o valor retornado deverá ser: 321332165463
Como eu posso fazer?
Aquele Abraço!!!
Tiago Farinon
Tiago Farinon
Curtir tópico
+ 0
Responder
Posts
04/04/2003
Aroldo Zanela
Function NumericOnly( cString: String ): String; var nX: Integer;// Laço de leitura da string Begin Result := ´´; For nX := 1 To Length( cString ) do If cString[ nX ] in [´0´..´9´] Then result := result + cString[ nX ]; End;
Responder
Clique aqui para fazer login e interagir na Comunidade :)