Delphi CE + Sqlite -- Problème avec champ date

Bonjour.

Je teste Delphi Community Edition (10.2) et notamment l'accès avec Firedac à des bases de données sqlite.

J'essaie avec une de mes bases mais j'obtiens l'erreur "Argument incorrect pour l'encodage de date.". Il y a effectivement un champ contenant des dates.
En revanche, pas de problème avec la base de démo livrée avec Delphi (SQLite_Demo) pour ouvrir la table Employees qui contient des champs date.

Différence : dans ma base, le champ est de type "Date" alors que dans la base de démo ils sont de type "DateTime" tel qu'indiqué dans l'éditeur de requête.
Si je visualise les tables dans DBBrowser for SQLite, mes dates sont représentées par des nombres, exemple "48338" pour le 22/3/2018 qui doit correspondre à un nombre de jours depuis une date initiale. En revanche, pour la base démo, c'est représenté en clair, exemple : "1948-12-08" ("08-12-1948" dans Delphi).

Si vous savez comment résoudre ce problème ...

Christian

Change ton format Date en DateTime
Le contenu du champ est le même. 48338 devient 48338,00
Time est la partie décimale qui est à zéro dans ton cas

SQLite supporte différents types, et gère les dates comme expliqué en 2.2, tout en implémentant des fonctions utilisables dans les requêtes.

Je ne sais pas comment Firedac interface la gestion des champs DateTime, mais il faut prendre garde à l'origine des réels codant un DateTime, qui n'est pas la même pour SQLite et Delphi...

Citation:

---

Envoyé par ALWEBER

Change ton format Date en DateTime
Le contenu du champ est le même. 48338 devient 48338,00
Time est la partie décimale qui est à zéro dans ton cas

---

d'après la doc, sqlite n'accepte pas la commande permettant de modifier le type d'un champ.

Donc j'ai créé un nouveau champ de type datetime puis recopié les valeurs et supprimé le champ de type date.
dans dbbrowser, l'affichage est inchangé : 48338 reste 48338 dans le nouveau champ.

et dans Delphi, toujours la même erreur, bien que le champ soit reconnu comme de type datetime

Citation:

---

Envoyé par tourlourou

SQLite supporte différents types, et gère les dates comme expliqué en 2.2, tout en implémentant des fonctions utilisables dans les requêtes.

Je ne sais pas comment Firedac interface la gestion des champs DateTime, mais il faut prendre garde à l'origine des réels codant un DateTime, qui n'est pas la même pour SQLite et Delphi...

---

Oui, j'avais déjà lu tout ça, sqlite ne propose pas de type date mais integer, real, text ... dans lesquels on peut mettre une date sous différentes formes et ensuite des fonctions pour les gérer ...
On peut quand même créer des tables avec des champs de type date ou datetime en sql ce qui n'est pas très logique !

C'est comme cela que j'ai créé mes tables que j'utilise sans problème avec d'autres langages. Ma question, c'est pourquoi cette erreur avec delphi CE et comment y remédier ?

Bonjour,

Citation:

---

Envoyé par thewolf

C'est comme cela que j'ai créé mes tables que j'utilise sans problème avec d'autres langages. Ma question, c'est pourquoi cette erreur avec delphi CE et comment y remédier ?

---

Je ne suis pas sur que "Delphi CE" soit responsable, mais plutôt, peut être, une méconnaissance de Firedac ?
Il me faudrait la structure de la table ou plutôt un échantillon pour en être sûr.

Une première piste : établir une règle de mappage (FormatOptions.MapRules)

Citation:

---

Envoyé par SergioMaster

Bonjour,

Je ne suis pas sur que "Delphi CE" soit responsable, mais plutôt, peut être, une méconnaissance de Firedac ?
Il me faudrait la structure de la table ou plutôt un échantillon pour en être sûr.

Une première piste : établir une règle de mappage (FormatOptions.MapRules)

---

Pour limiter les origines possibles du problème, j'ai créé une base minimaliste avec une table TestDates avec le code suivant (Lazarus - composant TSqlite3Dataset) :

FieldDefs.Clear;
FieldDefs.Add('Id', ftAutoInc);
FieldDefs.Add('Date', ftDate);
CreateTable;

Dans un grid, j'ai rentré les dates suivantes :
28/01/1965
28/06/2004
29/06/1966
(comme indiqué précédemment, quand je visualise dans DbDrowser, cela affiche 23770, 38166 et 24287)

Avec cette base, j'ai toujours l'erreur "Argument incorrect pour l'encodage de date." quand je fais "exécuter" dans l'éditeur de requête firedac (sql : SELECT * FROM TestDates)

J'ai déjà essayé avec une règle de mappage dans ce même éditeur : sourceDataType : dtDate et pour TargetDataType j'ai un peu tout essayé, je ne sais pas s'il faut remplir d'autres colonnes. Soit j'ai toujours la même erreur, soit la conversion n'est pas supportée, soit autre type d'erreur.

je mets en pièce jointe la base (enlever ".doc" que j'ai dû ajouter pour que le fichier soit accepté)
Pièce jointe 417386

Bonjour,

Citation:

---

Envoyé par thewolf

Pour limiter les origines possibles du problème, j'ai créé une base minimaliste avec une table TestDates avec le code suivant (Lazarus - composant TSqlite3Dataset)

---

Déjà, étant donné que l'on parle de Firedac, j'aurais fait autrement pour créer une table test ;)
1- pas par l'intermédiaire de Lazarus
2- directement par SQL (avec firedac il est assez facile de créer la base de données, puis un SQL pour créer la table)

Dans ce cas, le problème vient peut-être de la création "à l'ancienne"
en PS. Je n'aurais pas utilisé date comme nom de colonne (toujours se méfier des mots clés possibles), une chance ce n'est pas le cas avec SQLite mais il y a la fonction date(), j'ai quand même préféré renommer la colonne en DateTest

Citation:

---

(comme indiqué précédemment, quand je visualise dans DbDrowser, cela affiche 23770, 38166 et 24287)

---

Dans SQLite Studio aussi

Citation:

---

je mets en pièce jointe la base

---

merci comme ça c'est plus clair

Désolé, ma première piste , à chaud, n'était pas la bonne et pourtant proche !

le problème réside ici
Pièce jointe 417467
voir doc http://docwiki.embarcadero.com/RADSt...Lite_(FireDAC)
par défaut comme le montre si bien l'image les colonnes dates sont traitées comme des chaines et non comme des TDateTime

Je ne saurais que trop encourager à utiliser les dates et datetimes de SQLite sous le format "original" de SQLite c'est-à-dire chaîne pour des questions simple de portabilité (bonjour la galère pour retrouver dans SQLite Studio ou DBBrowser un format d'affichage de date normal

Code:

---

select id,datetest,strftime('%d-%m-%Y', '1899-12-30', '+'||Datetest||' days') from testdates

---

Bonjour.

Merci beaucoup pour l'intérêt porté à mon problème.

Citation:

---

Déjà, étant donné que l'on parle de Firedac, j'aurais fait autrement pour créer une table test

---

J'ai déjà pu regarder ce que fait Delphi CE + FireDac avec la base de démo fournie. Et cela fonctionne bien (j'ai indiqué dans mon premier post les différences que j'avais pu constater avec ma propre base).
Mon but est de voir si je peux le faire fonctionner avec une base que j'utilise depuis des années. Pour l'anecdote, je l'avais créée avec Delphi2 + BDE (fichier dbf) ... quand le BDE est devenu obsolète, je suis passé au couple Lazarus/SQLite. Je ne rappelle plus trop comment, mais j'ai réussi à transférer mes données depuis le fichier dbf dans une base SQLite.
J'ai créé les tables nécessaires avec le code indiqué, m'inspirant d'un tutoriel sur TSQLiteDataset. C'est pourquoi j'ai préféré créer une table test de la même manière ... (OK pour ne pas nommer un champ "Date", c'est parce que j'ai voulu faire vite, dans ma vraie table les champs ont des noms plus explicites).

Citation:

---

Je ne saurais que trop encourager à utiliser les dates et datetimes de SQLite sous le format "original" de SQLite c'est-à-dire chaîne pour des questions simple de portabilité (bonjour la galère pour retrouver dans SQLite Studio ou DBBrowser un format d'affichage de date normal

---

Bien noté. Je ne m'étais pas aperçu avant aujourd'hui qu'une date était encodée sous forme de nombre et que cela pouvait poser problème (exemple : dans mon programme avec le TSQLiteDataset, j'ai un champ déclaré de type TDateField, j'écris dedans avec la fonction date() et pour visualiser, je lie le champ à un TDBEdit ; la date s'affiche parfaitement sans que j'ai à indiquer le moindre formatage).

Citation:

---

le problème réside ici

---

J'ai cru un instant que la solution était trouvée ! Dans l'éditeur de connexion, j'ai changé le type pour DateTime mais maintenant j'obtiens :
"[FireDAC][DatS]-32. Débordement de la colonne [Date] de longueur variable. Longueur de la valeur - [5], longueur maximale de colonne - [0]."
En regardant la structure, il indique comme DataType AnsiString(o) ...

idem en choisissant le dernier type proposé (binary)

Bonne journée.

Citation:

---

Envoyé par thewolf

J'ai cru un instant que la solution était trouvée ! Dans l'éditeur de connexion, j'ai changé le type pour DateTime mais maintenant j'obtiens :
"[FireDAC][DatS]-32. Débordement de la colonne [Date] de longueur variable. Longueur de la valeur - [5], longueur maximale de colonne - [0]."

---

Étrange, j'avais bien entendu testé, mais avec une version Entreprise
Pièce jointe 417541Pièce jointe 417543

Oooops !

Mon programme de test avait sauvegardé la règle de mappage saisie précédemment ! Après suppression, cela fonctionne.

Encore merci.