Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Problem mit speichern in db (https://www.delphipraxis.net/30056-problem-mit-speichern-db.html)

muenchner 19. Sep 2004 10:17


Problem mit speichern in db
 
Guten Morgen!

Habe ein Problem mit dem abspeichern von Daten in DB.

Delphi-Quellcode:
...
Val(Form5.EditProvision.Text, Provision, code);
.....
Provision := (summe/100*(p));
.......
Str(Provision:8:2,s); Form5.EditProvision.Text :=s;
Im Formular zeigt mir EditProvision.Text 360.00 an.
wenn ich es abspeicher wir in die DB 36000.00 geschrieben.
Das Feld in der DB ist numerisch.
Was mache ich falsch?


Delphi-Quellcode:
tblVertrag2.FieldValues['Provision'] := EditProvision.Text;
Dank im Voraus

Rene

HomerGER 19. Sep 2004 10:21

Re: Problem mit speichern in db
 
hallo
ich bin mir nicht sicher
aber das formt ist 360.000,00
schreib doch mal 360,00

muenchner 19. Sep 2004 10:26

Re: Problem mit speichern in db
 
Hallo HomerGER!

Danke für die rasche Antwort, aber wie kann ich das ändern?
die Zahl wird berechnet.

HomerGER 19. Sep 2004 10:46

Re: Problem mit speichern in db
 
hallo
ich arbeite eigentlich nur mit den ADO's
und table's


in der DB
habe ich das Feld
format : Festkommazahll und 2 stellen hintern komma

rechnen im Programm mit Extended

zahl1 : Extended
zahl2 : Extended
zahl3 : Extended

zahl3 := zahl1 / zahl2

anzeigen
edit.text := FormatFloat('0,00 "Euro"', zahl3 );

in die db dann mit
Table1.FieldByName('Feld1').AsFloat := StrToFloat(edit.text);
oder direckt
Table1.FieldByName('Feld1').AsFloat := zahl3;

muenchner 19. Sep 2004 11:02

Re: Problem mit speichern in db
 
Hallo HomerGER!

Danke Dir für Deine Hilfe.
Funktioniert.

Noch einen schönen Sonntag.

Rene


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:01 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz