Recientemente he necesarios para representar la Pantalla de la imagen del Cursor para
mapa de bits. Esto es cómo hacerlo.
var
& nbsp & nbsp HCursor: THandle
begin
& nbsp & nbsp //Obtener el identificador de la actual del cursor
& nbsp & nbsp HCursor := Pantalla.Los Cursores[Ord(La Pantalla.Cursor)]
& nbsp & nbsp //Dibujar el icono de un lienzo de
& nbsp & nbsp DrawIconEx(MyBitmap.El lienzo.Asa,
& nbsp & nbsp & nbsp & nbsp XPos,Ypos,HCursor,32,32,0,0,DI_NORMAL)
fin
Ver DrawIconEx en la ayuda de Delphi para combinaciones que pueden reemplazar DI_NORMAL, como DI_MASK o DI_DEFAULTSIZE
¿Que hace mi cursor ?
¿Que hace mi cursor ? : Multi-millones de consejos para hacer su vida mas facil.
Recientemente he necesarios para representar la Pantalla de la imagen del Cursor para
mapa de bits. Esto es como hacerlo.
var
& nbsp & nbsp HCursor: THandle
begin
& nbsp & nbsp //Obtener el identificador de la actual del cursor
& nbsp & nbsp HCursor := Pantalla.Los Cursores[Ord(La Pantalla.Cursor)]
& nbsp & nbsp //Dibujar el icono de un lienzo de
& nbsp & nbsp DrawIconEx(MyBitmap.El lienzo.Asa,
& nbsp & nbsp & nbsp & nbsp XPos,Ypos,HCursor,32,32,0,0,DI_NORMAL)
fin
Ver DrawIconEx en la ayuda de Delphi para combinaciones que pueden reemplazar DI_NORMAL, como DI_MASK o DI_DEFAULTSIZE
