remplazar mas de un caracter en string

[gonza_619]

hola a todos , bueno mi consulta es la sig: tengo este valor tipo money ($1.500) pero necesito remplzar el signo $ y el punto '.' para que qede (1500) entonces luego poder hacer una operacion

lo hice con stringreplace( dbedit2.text, '$', '', ([rfreplaceall])

y me saco el signo $, pero no se como sacar el punto ala misma vez.
gracais de antemano

[urixiv]

Hola,
Una manera sencilla podria ser anidar los stringreplace

Stringreplace(stringreplace( dbedit2.text, '$', '', [rfreplaceall]), '.', '', [rfReplaceAll])

Salu2

[gonza_619]

buenisimo gracias funciono de maravillas

[urixiv]

De nada, un placer poder ayudar!!!!

[ContraVeneno]

¿y si solamente usas ".AsCurrency" en lugar de ".Text"?

[rrf]

Hola.

Está claro que la duda está resuelta y de una forma excelente.

Pero, para mí, lo hubiera resuelto en 2 líneas de código:

Código Delphi [-]
  stringreplace( dbedit2.text, '$', '', ([rfreplaceall]) ;
  stringreplace( dbedit2.text, '.', '', ([rfreplaceall]) ;

El código es más largo, aunque me parece más sencillo de revisar si hay un error.

Saludos.