[DELPHI] Code Source Recherche




*Composants:
edit1
RadioButton1   /// Nom
Radiobutton2   /// Prenom
Table1 : Champ Obligatoire : Nom & Prenom





///recherche
begin

if RadioButton1.Checked then  if not Table1.Locate('nom',edit1.text,[])
then
showmessage('non trover')  ;

if RadioButton2.Checked then if not Table1.Locate('Prenom',edit1.text,[])
then
showmessage('non trover');
end;
Algerie. Fourni par Blogger.