guardar números decimales
 

Hola, tengo un edit en el cual ingreso números para guardarlos en una base de datos (MySQL).
Este es el código que uso:

Código Delphi [-]
       Form1.ADOQuery1.Insert;
       Form1.ADOQuery1.FieldByName('numero').AsInteger:=StrToInt(Form1.Edit1.Text);
       Form1.ADOQuery1.Post;

Funciona bien cunado el número que intento guardar es entero, el problema es que aveces tengo que guardar números decimales, como puedo hacer para que me permita guardar números enteros y números decimales.


Muchas Gracias

Hola.

Prueba así:

Código Delphi [-]
Form1.ADOQuery1.FieldByName('numero').AsCurrency:=StrToInt(Form1.Edit1.Text);

o si necesitas más de 4 decimales:

Código Delphi [-]
Form1.ADOQuery1.FieldByName('numero').AsFloat:=StrToInt(Form1.Edit1.Text);

Saludos

Y por supuesto, el tipo de campo en la base de datos no puede ser entero ;)

Tiquismiquis.... :p