Discussion :

[prat381]

Bonjour,

Sur mon application, à partir d'une DBGrid, j'ai un besoin, pour l'enregistrement en cours, d'afficher des données complémentaires, qui doivent être le plus actualisées possibles.
Pour ces données complémentaires je pensais utiliser un SQLQuery connecté en permanence à la base. Par une configuration Maitre-esclave entre le dataset de la DBGrid et ce 2ndSQLQuery je vois en gros comment faire.
Par contre je ne vois pas comment faire pour que le 2nd SQLquery ne contienne que les données de l'enregistrement courant de la DBGrid. Je voudrais éviter de fetcher des enregistrements, afin d'être sûr que ce que contient le 2nde SQLQuery est le reflet de la base de données

Merci de votre aide

[ShaiLeTroll]

Dans une Relation Maitre-Détail c'est exactement ce que tu décris

C'est très simple, pour un test rapide, deux TSimpleDataSet (SDS1 et SDS2), deux TDataSource (DS1 et DS2), deux DBGrids
Tu relie au second TSimpleDataSet SDS2 comme MasterSource le DataSource DS1 du premier TSimpleDataSet SDS1
tu indiques dans SDS2 le MasterFields d'un champ présent dans SDS1

Pense que pour un DBGrid il faut utiliser TSimpleDataSet ou le trio TSQLQuery+TDataSetProvider+TClientDataSet

Je n'en fait pas souvent, j'ai proposé cette technique à un collègue et récemment sur le forum, dans le Premier DataSet, il semble qu'il soit préférable de mettre le champ lié comme IndexFieldNames

Dans le Second TSimpleDataSet, tu mes un SQL paramètre comme SELECT * FROM Table2 WHERE Table2.Champ = :ChampTruc
ChampTruc est le MasterFields dans SDS2 et le IndexFieldNames dans SDS1

A chaque déplacement dans SDS1 cela va fournir une nouvelle valeur pour ChampTruc et donc relancer la requête de SDS2

[Ph. B.]

Ok pour le principe mais juste une petite correction

Dans le Second TSimpleDataSet, tu mes un SQL paramètre comme SELECT * FROM Table2 WHERE Table2.Champ = :ChampTrucChampTruc est le MasterFields dans SDS2 et le IndexFieldNames dans SDS1

Dataset1

Code sql :

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

select * from TableMaitre

Dataset1

Code sql :

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

select * from TableDetails

Code :

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

1
2
3
Dataset2.MasterSource := Datasource1; // celui de DataSet1 alimentant la DbGrid1
DataSet2.MasterField := 'ColonneTableMaitre'; // Clé primaire TableMaitre
DataSet2.IndexFieldNames := 'ColonneTableDetails'; // Clé étrangère TableDetails

Dernière chose, Delphi propose des exemples dans le sous-répertoire d'installation demos\db\MastApp et demos\db\IbMastApp avec des dataset de type Table mais le principe reste le même...
--
Philippe.

[prat381]

C'est génial, merci

[ShaiLeTroll]

@prat381, Pense à

@Ph. B., en omettant le WHERE,
pour Paradox, cela ne pose pas de problème, il utilise une sorte de Filter,
pour un SGBD SQL, récupérer une table entière alors que l'on sait que l'on va Filtrer sur une valeur c'est un peu dommage en terme de performance !
J'ai maintenu pendant 1 mois une application utilisant ce système sur 3 Query (sur 15 tables via jointure) en tout SQL BDE+Paradox, la migration ADO+Oracle a été surprenamment simple et efficace à part ce détail ORACLE même SQL lancé via BDE ou ODA = DataSet différent
Une fois le passage de paramètre entre Master et Detail corrigé, cela fonctionnait normalement avec DS1 Master du Detail DS2, lui même Master de DS3 utilisé dans un TQuickRep