Discussion :

[GoustiFruit]

Bonjour,

J'ai une BDD SQLite3 sur laquelle je fais une requête qui doit me retourner une valeur réelle (champ "Rating2" dans les ex. ci-dessous).

Si je fais une requête comme ça, tout va bien:

Code :

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

1
2
3
4
5
6
7
with qry do begin
  SQL.Text := 'SELECT Rating2 FROM Matchs WHERE (Date < ''1912-04-01'') AND (Team1 = 9740 OR Team2 = 9740) ORDER BY DATE DESC LIMIT 1';
  Open;
 
  f := Fields[0].AsFloat;
  AddToLog(Format('Rating: %g, [f]));
end;

Résultat ok, affiché:

Rating: 950,640991210938

Mais si je fais comme ça...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
with qry do begin
  SQL.Clear;
  SQL.Add('SELECT CASE');
  SQL.Add(' WHEN Team1 = 9740 THEN Rating1');
  SQL.Add(' WHEN Team2 = 9740 THEN Rating2');
  SQL.Add('END');
  SQL.Add('FROM Matchs WHERE (Date < ''1912-04-01'') AND (Team1 = 9740 OR Team2 = 9740)');
  SQL.Add('ORDER BY Date DESC LIMIT 1;');
  Open;
 
  f := Fields[0].AsFloat;
  AddToLog(Format('Rating: %g', [f]));
end;

...j'ai une exception:

Exception class EConvertError with message ''950.640991210938' is not a valid floating point value'.

!?!?

Dans les deux cas, c'est la même valeur de la même ligne qui est recherchée (950.64...), pourquoi est-ce que ça provoque une exception dans le second ? J'ai également essayé avec:

Code :

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

f := StrToFloat(Fields[0].AsString);

Pareil

[Paul TOTH]

à mon avis

Rating1 = 950,640991210938
Rating2 = 950.640991210938

SQLite3 ne se préoccupant du type des colonnes, tu as du stocker une chaîne contenant une virgule à un moment donné.

[GoustiFruit]

Justement non !?
- D'une part mes valeurs sont bien stockées en "AsFloat" dans la table (ce sont des Single à l'origine sous Delphi).
- Et d'autre part les deux requêtes présentées ci-dessus retournent exactement le même champ de la même ligne !
Par contre j'ai l'impression que la deuxième requête retourne une chaîne peut-être parce que le "SELECT CASE" introduit une ambiguïté quant au type de données retournées ? (le champ retourné pouvant varier d'une requête à l'autre)
Une autre preuve que ce n'est pas un problème de virgule/point, c'est que si je fais:

Code :

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

f := StrToFloat(Fields[0].AsString);

Ça plante !
Mais si je fais:

Code :

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

f := StrToFloat(Copy(Fields[0].AsString, Length(Fields[0].AsString) - 2));

Ça marche !

Je vais partir sur la supposition que l'ambiguïté force le retour d'un champ de type STRING et que la conversion ne passe pas parce que la chaîne est trop longue !? Et je vais limiter mes valeurs à 2-3 chiffres après la virgule parce que de toutes façon je n'ai pas besoin de plus.

Mais si quelqu'un avait une explication, peut-être que je mourrai moins idiot...

[SergioMaster]

je ne connais pas cette BDD mais ? si tu forçais avec un CAST la valeur de retour ?

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
SELECT 
 CAST(CASE 
          WHEN Team1 = 9740 THEN Rating1
          WHEN Team2 = 9740 THEN Rating2
         END 
       AS FLOAT) AS RATING;
.....
ou 
CASE 
  WHEN TEAM1=9740 THEN CAST(rating1 AS FLOAT)
  WHEN TEAM2=9740 THEN CAST(rating2 AS FLOAT)
END

bien sur a tester et si le CASTING existe

[GoustiFruit]

CAST existe, les deux formes de la requête fonctionnent (même si je pense que le deuxième reste ambiguë), mais ça plante toujours au moment de la récupération dans Delphi (f := Fields[0].AsFloat). J'ai aussi essayé avec CAST (x AS REAL)

Ceci ne fonctionne pas non plus:

Code :

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

1
2
3
4
5
6
SELECT CASE
WHEN Team1 = 9740 THEN Rating1
WHEN Team2 = 9740 THEN Rating2
END * 1.0
FROM Matchs WHERE (Date < '1912-04-01') AND (Team1 = 9740 OR Team2 = 9740)
ORDER BY Date DESC LIMIT 1;

Ni la variante combinée CAST et * 1.0

J'ai aussi essayé avec ROUND(X, Y) sans plus de succès. Et puis... j'ai réalisé que mon Copy(...) était foireux, j'ai oublié un paramètre, résultat il me coupait le '.' et non la fin de la chaîne comme je le croyait ! Du coup... je m'excuse Paul Toth !!! mais c'est bien toi qui avais raison Et désolé aussi SergioMaster pour t'avoir fait perdre du temps pour rien (enfin j'aurais quand même appris quelque chose avec le CAST).
Un petit DecimalSeparator := '.' et c'est réglé.
Problème résolu.

[GoustiFruit]

Cela dit en passant... ça règle le problème de conversion string -> float, mais ça n'explique pas pourquoi dans un cas SQLite me renvoie une valeur de type float et dans l'autre une valeur de type string. Même quand j'essaye de forcer le type.