Locate pour éviter doublon
J'utilise delphi.
Code:
1 2 3 4 5 6 7 8 9 10
| procedure TForm1.EnregistrerClick(Sender: TObject);
begin
table1.Locate('Nom','valeur',[locaseinsensitive]);
if messageDlg('Souhaitez-vous ajouter cet enregistrement?', mtconfirmation,[mbYes,mbNo],0)= mrYes then table1.Active :=true;
table1.Post;
DBedit1.ReadOnly :=true;
DBedit2.ReadOnly :=true;
DBedit3.ReadOnly :=true;
DBgrid1.ReadOnly :=true;
end; |
il s'agit d'un morceau de code. la fonction que j'ai souligné en rouge "LOCATE" me cause un peu de problème.
elle devrai me permettre d'interdire l'enregistrement d'un même nom dans un tableau mais je n'arrive pas à dégoter la bonne syntaxe.
QUI PEUT M'AIDER?