Componentes en un panel

[ecfisa]

Empezado por Aleca

el TPanel tiene las siguientes propiedades :

Código Delphi [-]
  Panel1.ComponentCount;
  Panel1.Components[];

combinalo con los ejemplos anteriores (por lo que vi te muestran los componentes en general).

Hola Aleca.

En realidad para que funcione como en el código superior el propietario de los componentes debería ser el Panel ya que eso podemos evaluar con esas propiedades. Pero si fue creado en tiempo de diseño el propietario es el Form por lo que no va a funcionar.
Lo que sí funcionaría es :

Código Delphi [-]
var
  i: Integer;
begin
  for i:= 0 to Panel1.ControlCount - 1 do
    Caption:= Caption + Panel1.Controls[i].Name;
...

Ya que el Parent de los controles, al estar dentro del TPanel es el Panel y estas propiedades evaluan el Parent.

Pero en ese caso estaríamos evaluando por TControl y no TComponent como pidió GustavoCruz.


Un saludo.