void __fastcall TNclients::Button1Click(TObject *Sender)
{
  if ( Edit2.Text <> "" )
        {
        Table1->Edit(); // Positionne la table en mode Edition
        Table1->FieldByName("Nom")->Value=Edit2->Text; //Place le nom dans le TEdit dans la table
        Table1->FieldByName("Prenom")->Value = Edit3->Text;
        Table1->FieldByName("Adresse")->Value = Edit4->Text;
        Table1->FieldByName("Numero")->Value = Edit5->Text;
        Table1->FieldByName("Ville")->Value = Edit7->Text;
        Table1->FieldByName("Cp")->Value = Edit6->Text;
        Table1->FieldByName("Telephone")->Value = Edit8->Text;
        Table1->FieldByName("Mail")->Value = Edit9->Text;
        Table1->Post(); // Valide l'édition dans la base de données
        Edit2->Text="";
        Edit3->Text="";
        Edit4->Text="";
        Edit5->Text="";
        Edit6->Text="";
        Edit7->Text="";
        Edit8->Text="";
        Edit9->Text="";
        ShowMessage("Nouveau membre créer");
        
  else { ShowMessage("Veuillez remplir la case Nom");}
        
}
			
		
 
	
Partager