[rafita]

Muy buenas a todos.

Estaba haciendo pruebas con la creación dinámica de componentes y me surgen algunas dudas, sobre todo a la hora de eliminarlos de la memoria.
He estado buscando en este foro y, aunque he encontrado algunas cosas, no me termino de aclararme.

Básicamente veo dos posibilidades de crear los componenentes:

// Ejemplo 1.
var MiBoton : TButton;  // <-- Definido a nivel de formulario

procedure CrearBoton;   // <-- Creación y asignación a la variable previamente definida
begin
  MiBoton:=TButton.Create(Self);  MiBoton.Parent:=Self;                  // utilizando With sería más cómodo
  MiBoton.Caption:='Este es mi botón';
  MiBoton.Left:=25.........


// Ejemplo 2.
  for ind:=1 to 50 do
    with TButton.Create(Self) do  // <-- Creación sin asignarlo a ninguna variable
    begin
      Parent:=Self;
      Left:=PosX;  Top:=PosY;  Height:=36; Width:=140;
      Str(Ind:3,WInd); WInd:=StringReplace(WInd,' ','0',[rfReplaceAll]); 
      Name:='Boton'+WInd;
      Caption:=Format('Botón nº %d',[Ind])+#13'segunda línea';
      OnClick:=MostrarValor;  // asignación del evento

Según el Sr.Marco Cantú "El componente propietario (a menudo un formulario) se hace responsable de destruir todos los objetos que posee. En otras palabras, al liberar el formulario, éste libera todos sus componentes. Por ello, si se crea un componente y se le da un propietario, no hay que acordarse de destruirlo".

Dudas:

1. ¿Al crearlos con (Self) el propietario es el formulario dónde se crean?

2. En el primer ejemplo de creación puedo hacer un MiBoton.Destroy ¿es correcto o es mejor un MiBoton.DestroyAndNil?

3. En el segundo ejemplo al no tenerlo asignado a una variable ¿cómo lo destruyo?
He probado así:

for i:=1 to 50 do
   begin
     Str(Ind:3,WInd); WInd:=StringReplace(WInd,' ','0',[rfReplaceAll]);   
     Nombre:='Boton'+WInd;  // Nombre es un String
     DestruirBoton(Nombre);
   end;
procedure DestruirBoton(Sender : Tobject);
begin
  with Sender AS TButton do 
    Sender.Destroy;
end;

pero Nombre es un String ¿cómo hago para que referencie un objeto?

4. He visto el procedimiento DestroyComponents ¿con esto me evitaría destruirlos uno por uno? En mis pruebas, creo todos los componentes en OnCreate del formulario y con DestroyComponents en el OnClose, y no da error por muchas veces que lo ejecute.

5. ¿conoceís a alguién con más dudas o soy el peor?

Un saludo a tod@s.