Edit lerin hepsini bir anda silme

[grassular]

selam arkadaşlar;
sorum şu forma girdiğimde Editlerin hepsinin içerisi temizlenecek veya bir buton yardımıyla içeriğini temizlemek istiyorum ne yapmalıyım
teşekkürler

[mikser]

Kod: Tümünü seç

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  TEdit *Editler;
  // Editleri Temizle
  for (int i = 0; i < ComponentCount; i++)
  {
    Editler = dynamic_cast<TEdit*>( Components[i] );
    if (Editler)
      Editler->Text = "";
  }
  delete Editler;
}

iyi calismalar.

[grassular]

teşekkurler mikser dostum,bayagı işimi kolaylaştırdın