Contar componentes

[Neftali [Germán.Estévez]]

Empezado por petercat

Resulta que una vez creado varios paneles voy creando poco a poco botones en algunos panles pero a su vez quiero eliminar algunos de esos botones que he creado (como si fuera un .visible true o false). Consigo poner en .visible :False el ultimo boton que he creado pero no consigo cojer el boton que este dentro del panel elegido.

Al final todo se trata de poder identificar cada botón creado de forma única. Y la forma más fácil de hacerlo es a través del nombre que le asignes al crearlo (propiedad NAME).

Una vez que cada elemento tiene un nombre que puedes identificar de forma única, lo más sencillo es encontrarlo. Puedes hacerlo:

• Utilizando Components[i] para hacer un recorrido por todos.
• Utilizando FindComponent(Nombre) para buscar un componente por su nombre.
• Utilizando TObjectList para almacenar una referencia a los componentes creados.
  

La más sencilla es utilizar FindComponent con un código similar a este:

Código Delphi [-]
  var c:TComponent := FindComponent('Button1');
  if Assigned(c) then
    if (c is TButton) then
      TButton(c).Caption := 'Encontrado';