Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 26-09-2012
cloayza cloayza is offline
Miembro
 
Registrado: may 2003
Ubicación: San Pedro de la Paz, Chile
Posts: 948
Poder: 25
cloayza Tiene un aura espectacularcloayza Tiene un aura espectacular
Deberías hacer uso de DecimalSeparator y ThousandSeparator:

Código Delphi [-]
procedure TForm3.Button1Click(Sender: TObject);
var
value:Single;
begin
     value:=1200.34;

     Memo1.Lines.Add('Value:'+FloatToStr(value));

     {Cambio Decimal=, Miles=.}
     FormatSettings.DecimalSeparator:=',';
     FormatSettings.ThousandSeparator:='.';

     Memo1.Lines.Add('(9.999,9) Value:'+formatFloat('#,###.0',value));

     {Cambio Decimal=. Miles=,}
     FormatSettings.DecimalSeparator:='.';
     FormatSettings.ThousandSeparator:=',';

     Memo1.Lines.Add('(9,999.9) Value:'+formatFloat('####.0',value));
end;

Espero te ayude, saludos cordiales
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Puntos de observacion santi33a Lazarus, FreePascal, Kylix, etc. 4 16-05-2012 13:41:52
Poner puntos a los números mayores de 999 y hasta 1M Pedro-Juan Trucos 2 26-12-2007 19:13:08
Quitar todos los números de una cadena dec Trucos 0 07-06-2006 20:04:33
quitar numeros en un string davidgaldo Varios 3 24-09-2004 00:10:56
Puntos Carlex Varios 2 23-09-2004 14:44:09


La franja horaria es GMT +2. Ahora son las 20:08:48.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi