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


Tiago Farinon

Tiago Farinon

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

04/04/2003

Tiago Farinon

Valeu gente!!!

Vou fazer!


Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar