[asr0017]

if article.Locate(code_article,edit1.Text,[locaseinsensitive,lopartialkey]) Then
begin
messagedlg('article déja saisié ..?',mterror,[mbyes],0);
edit1.SetFocus;
else

end