Discussion :

[Jon Shannow]

Bonjour,

J'ai une base de données (SQLite3) dans laquelle j'ai (entre autres) 3 tables liées.

La première contient une liste d'Objet. Ces objets peuvent avoir plusieurs spécificités. T_Objets : obj_id, obj_nom, obj_prix, obj_tvaid, ...
J'ai une table qui contient la liste des spécificités : T_Specifs : spe_id, spe_nom
Et enfin, une table qui ne contient que 2 champs : T_Li_ObjSpe : obj_id, sp_id.

Je voudrais, dans une fiche "Objet" avoir une liste des spécificités de l'objet.
J'utilise la ZeosLib. J'ai mis une ZTable sur T_Objets, avec un datasource.
Je voudrais que dans une dbListbox le programme affiche automatiquement la liste des spécificités.
J'ai bien mis un ZSQL avec un datasource, mais là où je bloque, c'est sur comment, à partir de l'obj_id en cours, obtenir la liste des spe_nom associés...

Je ne sais pas si je me suis bien fais comprendre...

Merci d'avance
JS

[acaumes]

Bonjour,

Si tu peux travailler avec des requêtes SQL, utilises une requête avec les jointures qui vont bien ...

Code :

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

1
2
3
select a.obj_id, a.obj_nom , c.spe_nom
   from t_objets a join t_li_objspe b on a.obj_id = b.obj_id
                   join t_specifs c on b.sp_id = c.spe_id

NB Tu n'obtiendras avec cette requête que les objets qui ont des spécificités (avec autant de lignes que de spécificités). Si tu veux voir tous les objets utilises des jointures gauches

Code :

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

1
2
3
select a.obj_id, a.obj_nom , c.spe_nom
   from t_objets a left join t_li_objspe b on a.obj_id = b.obj_id
                   left join t_specifs c on b.sp_id = c.spe_id

Cordialement

[Jon Shannow]

Merci d'avoir répondu.

Ce que je veux, c'est la liste des spécificités pour l'objet encours dans la table des objets !
Et récupérer cette liste dans une listbox !

J'ai fait la requête suivante (qui fonctionne dans SQLite Expert)

Code :

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

SELECT t1.spe_nom FROM T_Specifs as t1, T_Li_ObjSpe as t2 Where (t1.spe_id = t2.spe_id) and (t2.obj_id=1)

Dans le résultat de SQLite Expert, je récupère bien la liste des Spécificité de l'objet dont l'id est 1.

Mais, dans le programme Lazarus, je n'arrive pas à remplir ma dbListBox avec le résultat de la requête, et je ne suis pas sur de la manière de synchroniser l'obj_id avec la table des Objets !

J'espère avoir été plus clair...

JS

[tintinux]

Bonjour

Tu pourrais utiliser cette requête (la 1ère proposée, avec un WHERE en plus) :

Code sql :

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

1
2
3
4
5
6
SELECT c.spe_nom
FROM t_objets a 
JOIN t_li_objspe b ON a.obj_id = b.obj_id
JOIN t_specifs c ON b.sp_id = c.spe_id
WHERE a.obj_id = :obj_id

Spécifier le paramètre obj_id dans le TZQuery correspondant.
Associer le DbListBox à un TDataSource qui soit lui même lié à ce TZQuery.

Et dans l'événement où l'objet affiché change (probablement OnDataChange d'un autre TDataSource), tu fermes le TZQuery, assignes une nouvelle valeur à son paramètre, et tu le réouvres.

On peut faire même mieux (plus "descriptif") en liant le TZQuery à la DataSource de l'objet affiché, mais c'est plus compliqué à expliquer, et ça n'ira pas plus vite...

[Jon Shannow]

On peut faire même mieux (plus "descriptif") en liant le TZQuery à la DataSource de l'objet affiché, mais c'est plus compliqué à expliquer, et ça n'ira pas plus vite...

Merci pour cette explication, ça fonctionne parfaitement.

Avant de mettre résolu, tu voudrais pas expliquer la manière de faire le lien avec TZQuery et le Datasource de la liste ? hum ? Enfin, sans vouloir abusé !

[tintinux]

Bonjour

Avec Zeos, il y a 2 possibilités :

La première qui existe aussi avec les composants orientés données de Delphi et avec SqlDb sous Lazarus, consiste à mettre dans le champ DataSource du Second TZQuery le nom du DataSource qui est lié au premier TZQuery (maître). Il faut ensuite que le nom du paramètre du second Query, sans les deux-points, soit exactement le même qu'un des champs du premier Query, et retournant la clé de jointure (on peut faire un alias dans le SQL pour que ça corresponde).

Cette méthode, qu'on peut qualifier d'historique, pose parfois de sérieux problèmes pour que les noms des champs correspondent et ne marche que si la jointure est sur un seul champ (ce qui reste recommandé).

La seconde, disponible uniquement avec Zeos, consiste à utiliser à remplir le champ MasterDatasource du second Query, au lieu de DataSource, et en plus les champs MasterFields et LinkedFields. Elle évite de devoir faire correspondre les noms des champs dans le SQL et permet d'utiliser des jointures sur plusieurs champs. Elle est donc un peu plus souple.

Ces deux techniques ne sont pas unanimement utilisées et créent parfois des problèmes, surtout en maintenance sur des grosses applications avec des modèles de bases compliqués et/ou évolutifs, ou si on doit générer des requêtes dynamiques. J'ai connu des collègues devant maintenir un existant, qui ont cherché pendant des jours pourquoi "ça ne marchait plus", car ils ne connaissaient pas ces techniques.

[Jon Shannow]

Merci beaucoup pour toutes ces explications.

Ça roule du feu de Dieu.

A+
JS