Ver Mensaje Individual
  #2  
Antiguo 07-04-2004
__cadetill __cadetill is offline
Miembro
 
Registrado: may 2003
Posts: 3.387
Reputación: 25
__cadetill Va por buen camino
Código:
while Pos('.', MiString) <> 0 do
  Delete(MiString, Pos('.', MiString), 1);
MiFloat := StrToFloat(MiString);
Espero te sirva
Responder Con Cita