Webanwendung Objekte zur Laufzeit erstellen

[akio87]

mit Arrays habe ich noch nie gearbeitet, ist ein komplett neues Thema für mich...

hab es nun mal so gestaltet, ich denke dass müsste nun 'nur' Statisch sein, oder?

ich bekomm dann folgende Fehlermeldung (Anhang)

Code:

PanelArray: array[1..999] of TUniPanel;

Code:

procedure Tfmstart1.UniButton1Click(Sender: TObject);
var
 i: Integer;
begin
  UniServerModule.SQLTable1.Active := false;
  UniServerModule.SQLTable1.TableName := 'artikelliste';
  UniServerModule.SQLTable1.Active := true;
  UniServerModule.SQLTable1.Open;

  //SetLength(PanelArray, 999);
  UniServerModule.SQLTable1.First;
  For i := 1 to UniServerModule.SQLTable1.RecordCount do
   begin
     //Panel erstellen
     PanelArray[i] := TUniPanel.Create(self);
     PanelArray[i].Parent := PanelArray[i].Create(PanelArray[i]);
     PanelArray[i].SetBounds(0,100*i -100,UniPanel1.Width,100);
     PanelArray[i].Name := 'ArrayPanel' + IntToStr(i);