Discussion :

[azouzmenai24]

salam,


j'ai une application avec delphi 7, pour la recherche d'un élément dans une table j'ai fait un filtre sur le nom

Code :

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

1
2
 
   Filtre := 'Nom =''' + FORM3.Edit2.Text + '*'''; {* Constrcuction du Filtre avec le texte saisi dans

le resultat du filtre est affiché dans un DBGRID , le but est de récupérer l’enregistrement recherché dans des EDITS avec un clic sur cet enregistrement dans DBGRID , malheureusement l’enregistrement récupéré est toujours le premier dans la table . Veuillez nous aidez SVP et merci d'avance.

[djiga4me]

Bonjour,
Il est normal que tu obtienne seulement le premier résultat dans les edits.
Pour obtenir les autres, il faudrait mettre un Table1.Next ; si je ne m'abuse.

[SergioMaster]

Bonjour,

Comme je suis plutôt anti-filtre je propose en premier la solution utilisant une query :

Code SQL :

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

SELECT * FROM TABLE WHERE NOM=:N

à remarquer que j'utilise également un paramètre
on utilisera alors la query de la manière suivante

Code :

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

1
2
3
Query.Active:=False;
Query.ParamByName('N').asString:=form3.edit2.text;
Query.Active:=True

Cependant, comme je présume que la table est une table paradox, le filtre peut être plus rapide, encore faut-il l'activer et le rafraichir au besoin

Code :

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

1
2
3
Table.Filtered:=False;
Table.Filter:=Format('Nom= %s',[quotedStr(Form3.edit2.text)]);
Table.Filtered:=True;

dans les 2 cas, pour éviter un clignotement désagréable on en profite généralement pour encadrer le code par un DisableControls,EnableControls.

Pour ce qui est de la suite de la question

le but est de récupérer l’enregistrement recherché dans des EDITS avec un clic sur cet enregistrement dans DBGRID

je n'ai malheureusement pas bien compris si les DBEdits sont lié au même datasource que la DBGrid cela ne devrait poser aucun soucis, si les DBEdits sont liés à un autre Datasource et donc une autre TTable il y a des possibilités de synchroniser les 2 tables de plusieurs manières :
de GotoCurrent(<TTableFiltrée>)
à toutes les méthodes permettant de se positionner sur le bon enregistrement (toujours BDE) FindKey,GotoKey etc...

P.S. prenez soin d'indiquer de quel SGBD il s'agit, de quels composants d'accès aux données vous utilisez et d'une manière générale soyez plus explicite (rien ne nous indique si DBGrid fait partie de de la même forme que Form3.Edit2.Text (par pitié mettez des noms explicites) et que les "EDITS" qui à mon avis posent problème parce que justement ce sont des EDITS et non des DBEdits

[azouzmenai24]

Merci beaucoup SergioMaster de ces détails et patience ,

concernant ma question :

le but est de récupérer l’enregistrement recherché dans des EDITS avec un clic sur cet enregistrement dans DBGRID

c a d dans l’événement OncelleClick du DBGRID j'ai mis le code:

Code :

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

1
2
3
form1.edit1.text:=form3.Table1.FieldByName('code').AsString;
form1.edit2.text:=form3.Table1.FieldByName('nom').AsString;
form1.edit3.text:=form3.Table1.FieldByName('prenom').AsString;

l'enregistrement récupéré dans form1.edit1.text - form1.edit2.text - form1.edit3.text c'est pas celui du filtre(mais c'est le premier enregistrement de la table du filtre).

Merci et meilleur salutations.

[SergioMaster]

Re,

je me permets de dire que votre programme est loin d'être clair !
form3.table1 est-elle bien la table filtrée ?
plutôt que l’événement OnCellClick essayez le OnDblClick de la DBGrid

[azouzmenai24]

Re bonjour

veuillez nous permettez la présentation du programme :

au lancement :




lorsque je veut saisir le credit d'un client , je doit parcourir la liste des clients a travers le boutton Parcourir liste client : je cherche avec le nom :




alors je clique sur le client que je recherche pour rammener au forme principale :



Merci d'avance.