[[nlsgarcia]]

marilinspi,

...una función que me convierta un Currency a String...ej. 1.195,60 a '119560'...

Otra forma :

Código Delphi [-]
function NumberToString(Number : String) : String;
var
   i : Integer;
begin
   for i := 1 to Length(Number) do
      if Number[i] in ['0'..'9'] then
         Result := Result + Number[i];
end;

procedure TForm1.Button1Click(Sender: TObject);
var
   Number : String;
begin
   Number := '1.234.567.890,99';
   ShowMessage(NumberToString(Number)); // Muestra : 123456789099
end;

Espero sea útil

Nelson.