void __fastcall TForm1::GroupEnable(TGroupBox *grbox, bool en)
{
  TControl *control;
  for(int i = grbox->ControlCount - 1; i >= 0; i--)
    if((control = dynamic_cast<TControl *>(GroupBox1->Controls[i])) != 0)
      control->Enabled = en;
}