[ecfisa]

Hola.

Y para no dejar la consulta del mensaje #10 sin respuesta...

Código Delphi [-]
procedure TForm1.btnDelPanelCtrlsClick(Sender: TObject);
var
  i: Integer;
begin
  with Panel1 do
  begin
    Caption := EmptyStr;
    for i := ControlCount-1 downto 0 do
      Controls[i].Free;
  end
end;

Saludos