Discussion :

[xweb-10]

Bonjour,

j'etulise ado pour connecter ma database access avec delphi 7

j'ai besoin d'un code pour faire une rechrche sur ma database

(recherche par nom)

j'ai fait une Edit et une boutton et je cherche le code qui fait une recherche sur

le nom entré dans EDIT

Merci

[Just-Soft]

Salut;

Code :

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

1
2
AdoTable1.Filter := 'Nom=' + Edit1.Tex;
AdoTable1.Filtered := True;

[abdelghani_k]

Tu as le choix :

1. Utilisation de fonction de recherche Locate, Findkey :

- Locate
Dans l'évènement OnChange de Edit1, saisir :

Code :

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

Table1.Locate('NOM',Edit1.Text,[loCaseInsensitive,loPartialKey]);

loCaseInsensitive,loPartialKey sont optionnels.
loCaseInsensitive : sans considération de minuscules/majuscules.
loPartialKey : recherche partielle.

- FindKey

Code :

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

Table1.FindKey([Edit1.Text])

2. Utilisation de filtre :

Code :

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

1
2
 Table1.Filter:='Nom='+Edit1.Text; 
  Table1.Filtered:=true;

[Montor]

Salut;

Code :

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

1
2
AdoTable1.Filter := 'Nom=' + Edit1.Tex;
AdoTable1.Filtered := True;

'Nom Like ' +QuotedStr(Edit1.Tex)

[abdelghani_k]

'Nom Like ' +QuotedStr(Edit1.Tex)

Like est un opérateur non applicable dans les filtres, il est utilisé dans les requetes :

Code :

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

1
2
select * from Table1
where nom like :param_nom

et c'est une autre manière de recherche.

[Just-Soft]

la balle est dans le camp de xweb-10 à lui de nous dire son taux de satisfaction pour vu qu'il se manifeste