Ver Mensaje Individual
  #89  
Antiguo 12-06-2007
tenporal tenporal is offline
Miembro
 
Registrado: may 2007
Posts: 28
Reputación: 0
tenporal Va por buen camino
Cool

Saludos Joarleco

Lo primero que debes checar es que para que sea tomado como numero solamente debe tener digitos y el separados de decimales (en mexico es el punto, tengo entendido que en españa es la coma) y te pongo el siguiente ejemplo:

En un formulario nuevo, inserta dos cuadros de texto (edit), y un boton "salir " y otro boton "convertir"

Código PHP:
procedure TForm1.Button2Click(SenderTObject);
var
//variable que contiene el codigo de error, si es cero no hay error
codigoerror:integer;
// variable que va a contener un numero con decimales
numero:real;
begin
// se trata de convertir el dato que existe en el edit1
VAL(EDIT1.Text,numero,codigoerror);
if 
codigoerror 0 then //si es cero se convirtio en numero
edit2.Text := floattostr(numero)  // ahora lo convierto en texto
else
begin // si no se pudo realizar la conversion
showmessage('teclea un numero sin espacios');
edit1.SetFocus
end
;
end

Yo programo en otros lenguajes, apenas estoy aprendiendo la sintaxis de Delphi, no se si tu problema es que los datos estan en un archivo (si es asi, deberias checar que realmente sean tomados como numero) o los tecleas en un programa (si es asi deberias validar la entrada de los datos numericos), bueno, espero que el codigo te sirva...

Hasta luego...
Responder Con Cita