Componentes en un panel

[Enan0]

Simplemente un comentario sobre algo que he leido hace algun tiempo en algun manual de delphi

en este decia que la utilizacion de "AS" no era muy conviente porque producia un consumo de memoria, talves excesivo

en su defecto recomendaba usar

Código Delphi [-]

  TControl(FCmpList.Items[i]).Enabled:= False;
  // activar Label1
  TControl(FCmpList.Items[FCmpList.IndexOf(Label1)]).Enabled:= True;

ecfisa, no es a modo de corrección (no estoy a la altura de semejante cosa) y perdon si estoy diciendo algo que es incorrecto.

saludos

Empezado por ecfisa

Un ejemplo:

Código Delphi [-]
{ Hacer algunas operaciones sobre la lista }
procedure TForm1.Button2Click(Sender: TObject);
var
  i: Integer;
begin
  // desactivar los controles de Panel1
  for i:= 0 to FCmpList.Count -1 do
    (FCmpList.Items[i] as TControl).Enabled:= False;
  // activar Label1
  (FCmpList.Items[FCmpList.IndexOf(Label1)] as TControl).Enabled:= True;
  // Borrar un elemento
  FCmpList.Items[FCmpList.IndexOf(Memo1)].Free;
end;
...

Saludos.