Discussion :

[hanitax]

salut à tous
j'ai deux table
table1(FACTURE )
table2(FACTURE,DESIGNATION)
et je voulais faire une recherche sur la deuxième table , pour afficher toutes les designations des produits qui correspond à un N°FACTURE que je saisie .
et merci
voila ce que j'ai essayé mais le code ne fonctionne pas :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 while not adotable3.Eof do
                              begin
                              if combobox1.Text<>'' then
                              begin
                              option:=[lopartialkey];
                              adotable3.Locate('FACTURE',combobox1.text,option);
                              design:=Adotable3DESIGNATION.AsString;
                              canvas.TextOut(1,i,design);
                              i:=i+interligne;
                              adotable3.Next;
                              end ;

[tarekk73]

bon jour
pas besoin de tout ce code : utilisez la relation maître-détail

Utilisez MasterSource pour spécifier le nom du composant source de données dont la propriété DataSet identifie un ensemble de données à utiliser comme table maître dans la définition d'une relation détail-maître entre une table et une autre.
La propriété MasterFields s'utilise après avoir affecté une valeur à la propriété MasterSource ou DataSource, pour spécifier le nom d'un ou de plusieurs champs utilisés pour établir une relation maître-détail entre un ensemble de données et l'ensemble de données maître. L'ensemble de données maître est spécifié en affectant sa source de données à la propriété MasterSource ou DataSource.
a+

[SergioMaster]

Bonjour,

pour faire suite à la réponse de Tarekk73 vous pouvez également utiliser une Requête (ADOQuery) paramètrée (ce qui est mieux pour beaucoup de raisons que je ne détaillerais pas ici)

Code sql :

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

SELECT DESIGNATION FROM Table2 WHERE FACTURE=:F

la valeur du paramètre Facture sera alors, selon votre code , égal à combobox1.text

P.S. Attention au type de données si FACTURE est un un champ texte , n'oubliez pas le Quotedstr(combobox1.text)

[hanitax]

je suis débutante en Delphi , et je pratique pas parfaitement l'utilisation de Maître-détails :/

Pour la deuxième table j'ai la désignation sur plusieurs lignes pour la méme facture , et j'ai pu récupérer que la premiére désignation correspond au numéro de facture saisie

[SergioMaster]

Il n'y a aucune notion de relation maitre-détail dans la solution que j'ai proposé
(sauf bien sur au niveau architecture de la table) .
Au vue du code publié , j'ai simplement proposé d'utilisé une Query (plutôt qu'un table) comme la sélection des 'détails' de la facture se fait via une combobox , la valeur du combobox devient le paramètre .

ce qui fait que , le même code ré-écrit donne
(bien que je ne comprenne pas trop le pourquoi du canvas etc ....)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
if combotext1.text<>'' then
begin
 ADoQuery3.Close;
 ADoQuery3.Parameters.parambyName('F').Value:=Combobox1.Text;
 ADOQuery3.Open;
while not AdoQuery3.Eof do
        begin
             design:=AdoQuery3DESIGNATION.AsString;
             canvas.TextOut(1,i,design);
             i:=i+interligne;
             adoQuery3.Next;
        end ;