[Willo]

Hola a todos;

tengo un problema del cual no encuentro solucion...

tengo un imagelist con varias imagenes, con un numero aleatorio, tomo una imagen de el y se la asigno a un componente de imagen, eso funciona bien la primera vez... pero intente asignarle al evento ON CLICK de la imagen la misma rutina para que el usuario cambiara de imagen y es ahi cuando obtengo el error de violacion de acceso.

esta es la rutina:

procedure TFmenu.Image1Click(Sender: TObject);
var
     x : integer;
     bmp : Tbitmap;
begin
     x:= GetRandomInt(Rotacion.Count);
     if x<12 then
     begin
          Rotacion.getbitmap(x,bmp);
          Image1.Picture.Bitmap.assign(bmp);
     end;
end;

Alguien tiene alguna sugerencia para corregir este problema?...

PD el mensaje de error aparece al ejecutar la linea: Rotacion.getbitmap(x,bmp);