Ver Mensaje Individual
  #4  
Antiguo 04-12-2016
Avatar de AgustinOrtu
[AgustinOrtu] AgustinOrtu is offline
Miembro Premium
NULL
 
Registrado: ago 2013
Ubicación: Argentina
Posts: 1.858
Reputación: 15
AgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en bruto
Código Delphi [-]
  TForm3 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    ArregloDinamico: array of TBitmap; // arreglo dinamico
    ArregloEstatico: array [1..10] of TBitmap; // arreglo estatico, 10 imagenes
  public
  end;

procedure TForm3.FormCreate(Sender: TObject);
begin
  // para el arreglo dinamico hay que indicar su tamaño
  SetLength(ArregloDinamico, 3); // 3 imagenes

  // el uso es el mismo, accedes por indice, 0 based
  ArregloDinamico[0]. ...
  ArregloDinamico[25] // si el arreglo es de 3 imagenes, al acceder a la posicion 25 tenes un error en tiempo de ejecucion
  ArregloEstatico[12] // en este caso te ayuda el compilador, porque te vas de rango y eso no compila
end;
Responder Con Cita