Discussion :

[lila23]

bonjour à tous,

voila j'aimerais vous demander comment faire quand on a une recherche a faire et que le résultat n'est pas qu'un seul enregistrement mais 2 ou 3 car moi ma recherche me donne qu'un seul enregistrement;

Code SQL :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
query1.Active:=false;
query1.SQL.Clear;
query1.SQL.Add(' select * from diplome where matri='''+edit1.Text+''' ' );
query1.Open;
edit1.Text:=query1.FieldValues['matri'];
edit2.Text:=query1.FieldValues['ref_dip'];
edit3.Text:=query1.FieldValues['intitule'];
edit4.Text:=query1.FieldValues['date_obt'];
edit5.Text:=query1.FieldValues['nom_org'];
edit6.Text:=query1.FieldValues['type_org'];
query1.SQL.Clear;

avec ce code je récupére un seul enregistrement alors que la personne peut avoir deux diplomes voire 3

merci

[qi130]

Il faut faire une petite boucle genre

Code :

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

1
2
3
4
5
6
Query1.First;
while not query1.eof do begin
// récupération des champs
   query1.next;
end; // while
query1.close;

[lila23]

vous voulez dire comme ca:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
query1.Active:=false;
query1.SQL.Clear;
query1.First;
while not query1.eof do
begin
query1.SQL.Add(' select * from diplome where matri='''+edit1.Text+''' ' );
query1.Open;
edit1.Text:=query1.FieldValues['matri'];
edit2.Text:=query1.FieldValues['ref_dip'];
edit3.Text:=query1.FieldValues['intitule'];
edit4.Text:=query1.FieldValues['date_obt'];
edit5.Text:=query1.FieldValues['nom_org'];
edit6.Text:=query1.FieldValues['type_org'];
query1.Next;
end;
query1.Close;

[lila23]

en faisant comme ca j'ai eut un message d'erreur:

cannot perform this operation on a close data set doit je enlevé le

Code :

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

1
2
3
 
query1.Active:=false;
query1.SQL.Clear;

et faire directement :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
query1.first;
whilenot eof query1 do
begin
query1.SQL.Add(' select * from contrat where mat='''+edit1.Text+'''  ');
query1.Open;
edit1.Text:=query1.FieldValues['mat'];
edit2.Text:=query1.FieldValues['ref_contrat'];
edit3.Text:=query1.FieldValues['type_contrat'];
edit4.Text:=query1.FieldValues['duree'];
edit5.Text:=query1.FieldValues['du'];
edit6.Text:=query1.FieldValues['au'];
edit7.Text:=query1.FieldValues['poste'];
edit8.Text:=query1.FieldValues['struct'];
edit9.Text:=query1.FieldValues['departement'];
query1.next;
end;
query1.close;
end;

[qi130]

La requète (select...) doit se situer avant la boucle

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
query1.Active:=false;
query1.SQL.Clear;
query1.SQL.Add(' select * from diplome where matri='''+edit1.Text+''' ' );
query1.Open;
query1.First;
while not query1.eof do
begin
edit1.Text:=query1.FieldValues['matri'];
edit2.Text:=query1.FieldValues['ref_dip'];
edit3.Text:=query1.FieldValues['intitule'];
edit4.Text:=query1.FieldValues['date_obt'];
edit5.Text:=query1.FieldValues['nom_org'];
edit6.Text:=query1.FieldValues['type_org'];
query1.Next;
end;
query1.Close;

[Andry]

while not query1.eof do
begin
edit1.Text:=query1.FieldValues['matri'];
edit2.Text:=query1.FieldValues['ref_dip'];
edit3.Text:=query1.FieldValues['intitule'];
edit4.Text:=query1.FieldValues['date_obt'];
edit5.Text:=query1.FieldValues['nom_org'];
edit6.Text:=query1.FieldValues['type_org'];
query1.Next;
end;
query1.Close;
[/code]

Le hic c'est que ce code n'as pas de sens car ce sera les valeurs de la dernière ligne qui vont être affiché.
Mieux vaut utilise une Grille ou un ListView pour afficher toutes les lignes.

A+

[BuzzLeclaire]

Le hic c'est que ce code n'as pas de sens car ce sera les valeurs de la dernière ligne qui vont être affiché.
Mieux vaut utilise une Grille ou un ListView pour afficher toutes les lignes.

A+

+1

[kroma23]

dans le cas ou le resultas de la recherche nous donne plusieur enregistrement
alors l'affichage ce fait dans un dbgrid et pas dans des edit pour voir toute les enregistrement.
relier votre datasource de ton dbgrid avec le dadasource du query.

[lila23]

bonjour à tous,
oui c'est vrai je récpére que le dernier enregistrement
j'aimerais utiliser un composant qui m'afficherais le résultat de la recherche que ce soit un deux ou plus

j'ai essayé la listview mais je ne c'est pas l'utiliser est ce que vous pouvez m'orienter sur son utilisation

merci bcp

[lila23]

la recherche s'effectue correctment c'est bon et je la récupére dans un dbgrid j'ai enlevé le

Code sql :

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

query1.close;

merci