Discussion :

[magicstar]

Bonjour

Comment comparer le contenu d'un edit aux valeurs d'un champ d'une table?
par exemple: un edit contient un numéro de code, en cliquant sur un bouton ma requête effectue une recherche dans le champ code de ma table pour vérifier si ce code existe ou non
j'ai essayé avec ce code qui ne marche pas

Code :

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

1
2
3
4
5
6
7
while not adoquery1.Eof do
    begin
        if (adoquery1cod.Value)= (strtoint(edit1.Text)) then
        messagedlg('erreur',mtinformation,[mbok],0)
        else
        Adoquery1.Next;
    end

Merci beaucoup

[Aka Guymelef]

Bonjour,

Déjà d'une part votre code ne fonctionne car il ne boucle pas sur tout les enregistrements (ici on ne regarde que l'enregistrement courant).

D'une manière générale il vaut mieux utiliser la méthode Locate du DataSet pour rechercher un enregistrement suivant une valeur.

[magicstar]

Bonjour,

Déjà d'une part votre code ne fonctionne car il ne boucle pas sur tout les enregistrements (ici on ne regarde que l'enregistrement courant).

D'une manière générale il vaut mieux utiliser la méthode Locate du DataSet pour rechercher un enregistrement suivant une valeur.

OK merci pour votre rapidité
Je vais voir ce que je peux faire avec Locate et je posterai mon code

[magicstar]

Et voilà c'est réglé

Code :

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

1
2
if Adotable1.Locate('code',edit1.Text,[]) then
    messagedlg('Ce code existe déjà',mtwarning,[mbOK],0)

encore Aka Guymelef