Dazimaltrennzeichen verschwindet bei Auslesen aus Datenbank

[ili]

Hallo,

ich lese für eine Datenbankanwendung (Delphi 2010 mit Oracle10 express) aus einem Feld der Datenbank einen Wert mit max. 2 Nachkommastellen aus.

In der Tabelle hat das Feld den Datentyp "Number" (mit 2 Nachkommastellen), das Komma wird aber nur angezeigt, wenn die Zahl Nachkommastellen hat.

Wenn ich diesen Wert in Delphi übernehme, verliere ich dabei das Dezimaltrennzeichen, in diesem Fall das " , ".

So gibt mir de rDirektzugriff auf die Datenbank den Wert 1,45 zurück, in Delphi erhalte ich den Wert 145

Der Datenbankzugriff ist per SQLConnection und SQLQuery umgesetzt.

mit folgendem Quellcode wird der Wert in Delphi übernommen:
-->

Delphi-Quellcode:

kg_transport := SQLQuery1.fieldbyname('p_kg_t').AsString;

und in eine Zelle eines StringGrids geschrieben:
-->

Delphi-Quellcode:

StringGrid1.Cells[i,j]:=  kg_transport

;

hat hier jemand eine Idee, was ich hier übersehen habe?

[Bernhard Geyer]

Was passiert wenn du den Wert als Floating-Wert ausliest (SQLQuery1.fieldbyname('p_kg_t').AsFloat)?

[DeddyH]

Wie sieht es so aus?

Delphi-Quellcode:

kg_transport := Format('%.2f',[SQLQuery1.fieldbyname('p_kg_t').AsFloat]);

[edit] Wo war der rote Kasten? [/edit]

[ili]

leider genauso
Es sollte lt. Datenbank der Wert 1,45 stehen

kg_transport := Format('%.2f',[SQLQuery1.fieldbyname('p_kg_t').AsFloat]);
ergibt 145,00 , es werden also nur die Nachkommastellen angehängt.

[DeddyH]

Wie greifst Du denn auf die DB zu? ADO, ZEOS, ...? Vielleicht kommen die verwendeten Komponenten nicht mit dem Datentyp zurecht.

[alfold]

Zitat:

Zitat von ili (Beitrag 1093416)

mit folgendem Quellcode wird der Wert in Delphi übernommen:
-->

Delphi-Quellcode:

kg_transport := SQLQuery1.fieldbyname('p_kg_t').AsString;

und in eine Zelle eines StringGrids geschrieben:
-->

Delphi-Quellcode:

StringGrid1.Cells[i,j]:=  kg_transport

;

mal ne blöde Frage, bleibt ein String nicht ein String?
hast Du mal geschaut was in kg_transport drin steht?

alfold

[ili]

@ DeddyH
ich greife auf die DB mit den folgenden Komponenten zu:

TSQLCONNECTION (aus Tool-Palette dbexpress) für die Connection
TSQLQUERY(aus Tool-Palette dbexpress) für den SQL- Befehl

@alfold
auch wenn ich mir den Wert als Float ausgeben lasse

Delphi-Quellcode:

kg_trans := SQLQuery1.fieldbyname('p_kg_t').AsFloat;

und den Wert in ein Textfeld ausgebe, verliere ich das Komma.

[ili]

ich habs herausgefunden:
in den Eingenschaften der SQLConnection gibt es einen Punkt "Decimal Separator". Der ist per default gesetzt, anscheinend habe ich den aber gelöscht.

Nach Eintrag eines Kommas als Dezimaltrenner kommen die richtigen Werte heraus.

Vielen Dank übrigens für die schnelle Hile :-)