Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Tablas planas (https://www.clubdelphi.com/foros/forumdisplay.php?f=20)
-   -   Problema al insertar flotante en Access (https://www.clubdelphi.com/foros/showthread.php?t=83579)

giulichajari 03-07-2013 12:21:20

Problema al insertar flotante en Access
 
Tengo este codigo en Builder:

Código Delphi [-]
Table1->FieldByName("Fecha")->AsDateTime = Edit1->Text;
      Table1->FieldByName("Detalle")->AsString= ComboBox1->Text;
      Table1->FieldByName("Marca")->AsString=Edit2->Text;
      Table1->FieldByName("Costo")->AsString=Edit3->Text==FloatToStr(Edit3->Text);
      Table1->FieldByName("Detalle")->AsString=Edit4->Text;
      Table1->FieldByName("PU")->Text.ToDouble()=Edit6->Text.ToDouble();
      Table1->FieldByName("Cantidad")->Text.ToDouble()=Edit5->Text.ToDouble();

Como hago para poder insertar un float a la base de datos(Costo, PU,Cantidad).
Muchas gracias

ElDioni 03-07-2013 18:37:18

Hola,
aunque en la tabla sea un dato Float puedes guardarlo directamente así

Código Delphi [-]
Adoquery1.FieldByName('Costo').AsString:=Edit3.Text;

Lo único que antes debería asegurarte que lo que hay escrito en el Edit3 es un número.

Saludos.

giulichajari 03-07-2013 18:42:49

Respuesta
 
Pues tendria que agregar el componente adoquery? Ademas me olvide de decir que trabajo en builder c++ no en delphi, pero lo intentare.

ElDioni 03-07-2013 19:08:24

Hola,

yo no trabajo en builder c++ pero con lo mismo que tienes tú supongo que será algo así.

Código:

Table1->FieldByName("Costo")->AsString=Edit3->Text;
Saludos.

giulichajari 03-07-2013 22:35:11

Respuestas
 
Claro pero ademas no te dije que tengo un campo de precio unitario y otro de cantidad, que luego de ingresados, se multiplican y muestran el costo total, es por eso, que necesito manejar los float si o si disculpame.
Ese es el codigo del edit:
Código Delphi [-]
Edit3->Text = FloatToStr(StrToFloatDef(Edit5->Text, 0) *
                            StrToFloatDef(Edit6->Text, 0));

ElDioni 04-07-2013 14:05:26

Cita:

Empezado por giulichajari (Mensaje 463184)
Claro pero ademas no te dije que tengo un campo de precio unitario y otro de cantidad, que luego de ingresados, se multiplican y muestran el costo total, es por eso, que necesito manejar los float si o si disculpame.
Ese es el codigo del edit:
Código Delphi [-]Edit3->Text = FloatToStr(StrToFloatDef(Edit5->Text, 0) * StrToFloatDef(Edit6->Text, 0));


Hola,

la verdad, creo que estoy algo perdido, ¿este código que pones ahora también te falla?, creía que el problema que tenías era poder guardar el dato que contiene el Edit3, que es texto, a un campo de una tabla que es float, ¿has probado el código que te puse antes?, ¿ha funcionado?, si ha dado error ¿que error te ha dado?. Quiero decir que ahora mismo no se si te falla si te funciona, lo que te falta, lo que quieres conseguir, etc.

Saludos.


La franja horaria es GMT +2. Ahora son las 12:37:10.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi