🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.delphi.bazy-danych
Article #80919

AsFloat (Firebird + zeos + CodeTyphon)

#80919
From: moxi
Date: Thu, 01 Oct 2015 14:58
26 lines
783 bytes
Witam,

trafilem na dziwne zachowanie zestawu z tematu, upraszczajac mam w FB 
pole: WARTOSC Decimal(10,2) a w kodzie:

ZQueryFB.SQL.Text := 'INSERT INTO TabelaX (WARTOSC_X) VALUES (:Parametr);';

ZQueryX.ParamByName('Parametr').AsFloat := 
ZQueryY.FieldByName('WARTOSC_Y').AsFloat;

pod Windows dziala dobrze a jako cross dla Linux zaczynaja sie chece tzn 
w bazie zawsze laduje mi 0.00, sprawdzilem przypisanie

ZQueryX.ParamByName('Parametr').AsFloat := 1.23;

i jest ok, prawidlowa wartosc pojawia sie w bazie, natomiast

WriteLn(ZQueryY.FieldByName('WARTOSC_Y').AsString);

sa dziwne wartosci, np dla 634,00 podaje 1.35855497866354E-12 a powinno 
przeciez byc 6.34E+2, co moze byc tego powodem? jak to obejsc?

FB 2.5, zeos 7.2 rev 3645, CT 5.2
wszystko 64 bit

Pozdrawiam,
moxi

Message-ID: <560d2e0e$0$8381$65785112@news.neostrada.pl>
Path: polish.pugleaf.net!archive.newsdeef.eu!apf1.newsdeef.eu!news.usenet.farm!..!..!not-for-mail