Czyszczenie elementu Panel1

Mam taki ot element na Formie - TPanel o nazwie Panel1. Mam na nim 5 elementów TLabel i 5 przycisków TButton. Jak usunąć je wszystkie z tego panelu?

var i : Integer;

for i:=0 to Panel1.ControlCount-1 do
Panel1.Controls[i].Destroy();

Wyświetla się wtedy "List index out of bounds" i wywala program.
Dodam, że te przyciski generuję w locie, labele tak samo.

for i := Panel1.ControlCount - 1 downto 0 do
  Panel1.Controls[i].Free; 

Można też bez zmiennej:

  while (Panel1.ControlCount > 0) do
    Panel1.Controls[0].Free;