Discussion :

[jojo86]

Bonjour,

Je me suis inspiré de ce post http://www.developpez.net/forums/showthread.php?t=23021, pour vérifier si une valeur éxistait dans ma table avant de l'inseret en sql.J'utilise un TEdit. j'ai placé ce code sur un bouton afin de faire des tests, mais j'ai toujours le même résultat qui est :' valeur de MonChamp existante'.

Voici mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
begin
Query1.Close;
Query1.SQL.Text:= 'SELECT count(Application) FROM Application WHERE Application='+QuotedStr(nomapplication.text);;
Query1.open;
if Query1.FieldCount>0 then
begin
showmessage('Valeur de MonChamp existante')
end
else
showmessage('Valeur de MonChamp non trouvée');
end;

Merci de votre aide !

[Cl@udius]

Salut

Pas FieldCount mais RecordCount !

[edit]
FieldCount renvoie le nombre de champs de ton Query. C'est pas le but.

Ensuite RecordCount renvoie le nombre d'enregistrements du Query. Mais dans ton cas celui-ci sera toujours à 1, puisque tu utilises la fonction d'aggrégat Count.
En fait il faut que tu examines ce que te renvoie Count(), 0 ou >0.

Code :

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

1
2
 
  If Query.Fields[0].Value = 0 then ...

@+ Claudius

[jojo86]

Merci beaucoup, ça fonctionne du tonnerre !!! merci !

[Cl@udius]

Un petit ? si c'est OK.