TForm3 = class(TForm)
procedure FormCreate(Sender: TObject);
private
ArregloDinamico: array of TBitmap; ArregloEstatico: array [1..10] of TBitmap; public
end;
procedure TForm3.FormCreate(Sender: TObject);
begin
SetLength(ArregloDinamico, 3);
ArregloDinamico[0]. ...
ArregloDinamico[25] ArregloEstatico[12] end;