| 12
 3
 4
 5
 6
 7
 8
 9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 
 | void __fastcall TDOM::BoutonSupprimerClick(TObject *Sender)
{
  int i; int j; int s ; int r ; // éviter plusieurs déclatarion sur la même ligne, 
// ou alors plutôt // int i, j, s, r;
// mais comme ce sont compteurs de boucle, il vaut mieux écrire
// for (int 1=0; i<max; i++) 
  int rep= MessageBox(Handle,"Etes-vous sûr de vouloir supprimer cette personne ?",
     "Avertissement",MB_OKCANCEL|MB_ICONSTOP ) ;
 
   if (rep ==IDOK)
   {
     TableDOM->First();  // quelle est la déclaration de TableDOM ? //                           probablement TList *
     TPS->TableTpsDom->First();  
// pour parcourir une liste une TList, je fais comme cera
/*
  for (int i=0; i<Liste->Count; i++)
  {
    TYPE* UnItem;
    UnItem = (TYPE*)Liste->Items[i];
   ...
  }
*/
     for     // inutile
     (j=0);//  inutile
     for (i=1;i<=TableDOM->RecordCount; i++);
     for (s=0);
     for  (r=1;i<=TPS->TableTpsDom->RecordCount; r++);
     {
       {
         {
            {
               if (TableDOM->FieldByName("VOL")->Value==VolEdit->Text)&
 (TPS->TableTpsDom->FieldByName("VOL")->Value==DOM->VolEdit->Text);
                  {
                     TableDOM->Delete();
                     TPS->TableTpsDom->Delete();
                  }
             }
          }
      }
  }
 
 BoutonAjouter->Enabled= true;
 BoutonSupprimer->Enabled = false; |