Remplacer dans un DbGrid un ID d'une table par son équivalent string d'une autre table

Bonjour à tous,
Débutant en base de données, je vais peut-être poser une question triviale.

J'ai une base de données comportant plusieurs tables.
Dans la table 1 "OPERATION" , j'ai un champ ID_CATEGORIE (int)
Dans la table 2 "CATEGORIE", j'ai deux champs ID_CATEGORIE (int) et NOM_CATEGORIE (string).

J'affiche sans problème dans un DBGRID tous les champs de ma table 1 "OPERATION", mais je voudrais remplacer dans la colonne "ID_CATEGORIE" la valeur (integer) par son équivalent (string) contenue dans NOM_CATEGORIE de la table 2 "CATEGORIE".

Est-ce possible sans passer par un autre affichage, par exemple avec un stringGrid ?

Merci de vos réponses.

Jean-Louis

Bonsoir,

Citation:

---

Envoyé par illuch

Est-ce possible sans passer par un autre affichage, par exemple avec un stringGrid ?

---

Oui, mais pas par un StringGrid c'est un travail sur la source de données qu'il faut faire.

Deux solutions : la meilleure utiliser une Requête (Query) comme source de données, moins bonne ajouter un champ (lookup) à la table
1- La requête : SELECT O.*,C.NOM_CATEGORIE FROM OPERATION O JOIN CATEGORIE C ON O.ID_CATEGORIE=C.ID_CATEGORIE ;
le O.* sera remplacé par O.colonne(s) voulue(s) de la table OPERATION
inconvénient, si la requête doit être en mise à jour il faudra ajouter un UpdateSQL

2- il suffit de déclarer tous les champs de la table1 puis de rajouter un champ de type lookup lié à table 2 :moinser:

P.S.
il aurait été judicieux d'indiquer la version de Delphi et les Composants de connexion et le SGBD utilisé
une contrainte de clé étrangére (FOREIGN KEY) entre OPERATION et CATEGORIE améliorera sensiblement la vitesse

Merci de la réponse

Je vais étudier tout ça

J'utilise Delphi XE2 avec interbase et les composants IBQuery, IBDatabase, IBTable ...

Citation:

---

=le O.* sera remplacé par O.colonne(s) voulue(s) de la table OPERATION

---

voilà ce que j'ai fait

Code:

---

1 2 3 4 5 6 7

procedure TForm1.Button1Click(Sender: TObject); begin Form3.IBQuery1.Close; // Close the query, Form3.IBQuery1.SQL.Clear; Form3.IBQuery1.SQL.Add('SELECT O.ID_OPERATION,C.NOM_CATEGORIE FROM C_OPERATION O JOIN C_CATEGORIE C ON O.ID_CATEGORIE=C.ID_CATEGORIE '); Form3.IBQuery1.Open; end;

---

Lorsque je clique sur le button1, je n'ai pas d'erreur. Dans mon DBgrid, j'ai toujours l'affichage de ma table C_OPERATION, mais je n'ai pas l'affichage de NOM_CATEGORIE qui se trouve dans la table C_CATEGORIE.

Merci de votre aide

Jean-Louis

Bonjour,

Plusieurs possiblités
- vous avez déjà défini les colonnes de votre grille
- vous avez défini les champs (mais je pense qu'il y aurait eu erreur)
- il y a un problème dans les données/la structure de la base


Note :

Code:

---

1 2	Form3.IBQuery1.SQL.Clear; Form3.IBQuery1.SQL.Add('SELECT O.ID_OPERATION,C.NOM_CATEGORIE FROM C_OPERATION O JOIN C_CATEGORIE C ON O.ID_CATEGORIE=C.ID_CATEGORIE ');

---

peut se remplacer par

Code:

---

Form3.IBQuery1.SQL.Text:='SELECT O.ID_OPERATION,C.NOM_CATEGORIE FROM C_OPERATION O JOIN C_CATEGORIE C ON O.ID_CATEGORIE=C.ID_CATEGORIE';

---

Note bis : j'ai corrigé les balises encadrant le code (bouton #)

Merci de votre réponse
Je viens de trouver.
La requête est correcte.
Dans la config, j'avais mis " DataSource1.DataSet:=IBTable1" au lieu de " DataSource1.DataSet:=IBQuery1".

JL