Entwickler-Ecke :: Thema anzeigen - Währung, paradox-Tabelle

Killi - Di 20.09.05 19:45
Titel: Währung, paradox-Tabelle - Fehler beim Schreiben in DB

Hi,

ich bekomme bei folgendem Code immer einen Fehler:

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

     test:= 4.50;

     QData2.Active:= False;
     QData2.SQl.Clear;
     QData2.SQl.Add('Insert into liefer (Gesamtpreis) values (' + FloatToStr(test) + ')');
     QData2.ExecSQL;

EDBEngineError - Meldung: 'Ungültiger Parameter'

wenn ich dagegen

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

     test:= 4.50;

     QData2.Active:= False;
     QData2.SQl.Clear;
     QData2.SQl.Add('Insert into liefer (Gesamtpreis) values (4.50)');
     QData2.ExecSQL;

schreibe, dann funktioniert es - aber das mache ich auch mit "test" oder nicht???
Gesamtpreis ist vom Typ Währung.

Irgendwie ist heute nicht mein Tag...bin überarbeitet...früher hatte ich nie Probleme mit so etwas!?

Moderiert von Christian S.: Code- durch Delphi-Tags ersetzt

jasocul - Di 20.09.05 19:51

iirc berücksichtigt FloatToStr den Dezimal-Separator in den Windows-Einstellungen.
Wenn du im Source den Wert für DecimalSeparator anpasst, sollte es funktionieren:

Delphi-Quelltext

1:	DecimalSeparator := '.';

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!