Cita:
|
Empezado por Investment
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
|
Gracias por la respuesta.
LA cosa es que ahora me dice esto :
Undeclared identifier : "Len"
Tengo delphi 5.0
¿Que puedo hacer?
Gracias anticipadas
18-10-2004
Modo Hilado