Array of TImage von anderer unit benutzen

[Andreas L.]

Hi,
ich habe jetzt in meiner Klasse (siehe diesen Post:http://www.delphipraxis.net/internal...t.php?t=109480) den Constructor weiter ausgebaut. Ich möchte dort 7 Images in ein Array erstellen. Dieses Array soll dann von einer anderen Unit aus verwendet werden können um Bilder zu zuweisen die später von der ScrollBox benötigt werden. Ich bin an die Sache so rangegangen:

Delphi-Quellcode:

...
...

 type
  TElementList = class(TScrollBox)
   constructor Create(AOwner: TComponent); override;
   function Add(ElemType: TElementType; Content: String):Integer;
   procedure Refresh;
   procedure Move(OldPosition, NewPosition: Integer);
  end;

var
 Icons: Array of TImage; //hier wird der Array deklariert

...
...

constructor TElementList.Create(AOwner: TComponent);
begin

 inherited Create(AOwner);
 BevelInner := bvNone;
 BevelKind := bkFlat;
 BevelOuter := bvLowered;
 BorderStyle := bsNone;

 Items := TObjectList.Create;

 //hier erstelle ich die images, beim ersten bild bleibt der debugger stehen und es hagelt eine AV
 Icons[0] := TImage.Create(Self);
 Icons[1] := TImage.Create(Self);
 Icons[2] := TImage.Create(Self);
 Icons[3] := TImage.Create(Self);
 Icons[4] := TImage.Create(Self);
 Icons[5] := TImage.Create(Self);
 Icons[6] := TImage.Create(Self);

end;

Und so versuche ich Bilder in den Array zu packen:

Delphi-Quellcode:

 Icons[0].Picture := text.Picture;
 Icons[1].Picture := image.Picture;
 Icons[2].Picture := chart.Picture;
 Icons[3].Picture := table.Picture;
 Icons[4].Picture := syntax.Picture;
 Icons[5].Picture := html.Picture;
 Icons[6].Picture := media.Picture;

Welches Problem hat der Debugger hier?