Hola.
Busqué en pero no pude encontrar referencia a ese comportamiento
.
Se me ocurren dos soluciones, la primera mediante una función miembro:
Código PHP:
...
class THWinControl : public TWinControl {
public:
int CtrlCount() {
int n = ControlCount;
for(int i = 0; i < ControlCount; i++)
if(Controls[i]->ClassNameIs("TLabeledEdit")) n--;
return n;
}
};
...
/* Ej. de uso */
void __fastcall TForm1::Panel1Exit(TObject *Sender)
{
THWinControl* HWC = static_cast<THWinControl*>(LabeledEdit1->Parent);
Label2->Caption = HWC->CtrlCount();
}
o mas simple, mediante una función:
Código PHP:
...
int CtrlCount(TWinControl* WC)
{
int n = WC->ControlCount;
for(int i = 0; i < WC->ControlCount; i++)
if(WC->Controls[i]->ClassNameIs("TLabeledEdit")) n--;
return n;
}
/* Ej. de uso */
void __fastcall TForm1::Panel1Exit(TObject *Sender)
{
Label2->Caption = CtrlCount(LabeledEdit1->Parent);
}
Saludos
