|
|
 |
 |
|
Paypal | |
|
FTP | |
|
CCD | |
|
Buscar | |
|
Trucos | |
|
Trabajo | |
|
Foros | |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#2
18-10-2004
|
||||
|
||||
|
Código:
//CadenaFloat, ParteEntera y ParteDecimal son de tipo string
CadenaFloat:= floattostr(Tuvariablefloat);
ParteEntera:= copy(CadenaFloat,0,pos(',',CadenaFloat)-1);
ParteDecimal:= copy(CadenaFloat,pos(',',CadenaFloat)+1,length(CadenaFloat));
if Len(ParteDecimal)>2 then
ParteDecimal:= Copy(ParteDecimal,1,2); //Ya tienes solo dos decimales
__________________
Saludos, Peter Investment 
|
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
 |
|
Modo Hilado