рандом по массиву TPanel

[Sheffdop]

всем привет! имеется массив

var
maspanel: array [0..59] of TPanel;

у всех панелей Visible:=False. как сделать, чтобы при нажатии на кнопку рандомно одна из панелей становилась видимой? и еще бы хотелось знать как сделать, чтобы эти панели не повторялись при нажатии кнопки? подскажите, пожалуйста...

[Скандербег]

var
  Pans : set of byte;
  Cnt : Integer = 0;

procedure TForm1.Button1Click(Sender: TObject);
var
  I : Integer;
begin
  if Cnt >= 59 then Exit; //после отображении последней панели блокировка выполнения кода
  I := Random(60);  //случайный индекс очередной панели
  while I in Pans do   //если индекс уже есть в set, пытаемся найти тот, которого нет
    I := Random(60);
  Include(Pans, I);  //индекс запоминается в set
  Inc(Cnt);  //счетчик отображенных панелей

  maspanel:[I].Visible := True; 
end;