如何获取动态生成对象的地址?

[pacman1891]

我要动态生成Image对象，生成的时候就用指向Image类型的指针数组指向该对象,目的是随意访问任何一个Image，代码如下：
private
Tile: array[0..100] of TImage;
sss: Integer;
...
...
...
procedure TForm1......
begin
Image := TImage.Create(Self);
Image.Name := IntToStr(sss);
...
Tile[sss] := @Image;
sss := sss + 1;
...
...
可是我发现所有的指针都指向一个地址，好像是一个用来生成Image的地方，而最终生成的Image都在另外的地址，请问我怎么才能取到它们，让指针指向每个Image呢

[zjybestzjybest]

Tile[sss] := Image;

[offsider]

mark