TImageList & cursor raton

[gallipi]

Hola a todos,

Trabajo en una aplicación que tiene una barra de herramientas llena de iconos. Estos iconos estan almacenados en un Imagelist.

Cuando pulso un botón de la barra de herramientas quiero asignar el icono de éste, al cursor del ratón.


Código Delphi [-] bmp:TBitmap
bmp :=TBitmap.Create;
...
...
imagelist1.getBitmap(index,bmp);

SetCursorIcon(bmp);




Imaginaba q la funcion getBitmap, cargaría el icono en la variable BMP, pero lo cierto es q no es asi.
¿Como puedo sacar una imagen del imgaList?


Gracias!!!!