Discussion :

[delphichem]

Salut a tous,
J'ai un problème avec Dbexpress 4 et Oracle.
Quand j'essaie de caster une chaine de caractère vers un Réel, je n'obtiens pas le résultat escompté, le problème vient du fait que je n'ai pas de virgule.
Je m'explique.
Dans une forme, je met un TSQLConnection et un TSQLQuery et un bouton.
Je renseigne TSQLConnection avec une base oracle, puis dans mon TSQLQuery, je saisie dans SQL la requête suivante:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
select cast('12345' as number) / 100  + 10 as XX
from Dual

dans onclick du bouton je met:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
  SQLQuery1.Active := True;
  ShowMessage(SQLQuery1.Fields[0].AsString);

J'obtiens 13345 au lieu de 133.45, donc je n'ai pas le point décimal.
Voila c'est tout merci d'avance.
Delphi 2007 DBX4 Oracle 10G
NB J'ai fais le test sous interbase, ça marche très bien.

[Franck SORIANO]

C'est marrant, j'ai exactement le même problème avec Oracle, mais en utilisant directement OCI.dll fournie par Oracle (et sur une requête select sum(...)).

Lorsque je lis le résultat, OCI me dit que le champ number possède 0 décimal et du coup je récupère un entier.

Je contourne le pb avec une requête du genre :

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
select cast(TO_NUMBER('1234')/100 as number(10,4))
from dual;

Le tout c'est d'ajouter un cast sur le résultat du calcul.

[delphichem]

Salut Franck,
Malheureusement, j'ai copier collé le code que tu m'as envoyé, le problème persiste.
Le comble c'est que sous Toad ou PlsqlDeveloper tout fonctionne très bien

[delphichem]

Je viens de tester avec Anydac, ça fonctionne très bien, donc j'imagine que le problème vient de DBexpress.
Mais comme je suis contrains de travailler avec DBX donc, je suis bloqué.

[helmis]

Pas de problème avec qu'ADO.

[helmis]

avec les DBX ça marche aussi