1 2 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; |