mehrere Buttons erstellen

[[TP]Hawk274]

Ich möchte mehrere Buttons erstellen. Dabei will ich aber auf jeden Button einen Pointer haben. Des weiterem will ich alle Buttons als Array verwalten. Also möchte ich quasi ein Array Pointer. Doch dabei bin ich auf Probleme gestoßen.
Folgende Lösungsansatz habe ich bereits. Doch beim ersten Create eines Buttons kommt eine Schutzverletztung. Aber warum? In diesem Source ist auch noch nicht realisiert das ich auf alle Buttons einen Pointer habe. Oder ist die Variable pbTemp dann als Zeiger "an zu sehn"!?

Code:

  const
    MAX_BUTTONS = 500;  

  var
    pbTemp: Array of TButton;
 
  .
  .
  .

  SetLength(pbTemp,MAX_BUTTONS);
  for i:=0 to MAX_BUTTONS-1 do
    pbTemp := nil;

  for i:=0 to MAX_BUTTONS do
  begin
    pbTemp[i] := TButton.Create(nil);
    pbTemp[i].Name := 'ButtonNr' + IntToStr(i);
    pbTemp[i].Parent := Form1;
    pbTemp[i].Top := 16 + 1;
    pbTemp[i].Left := 300;
  end;