Qu'est ce que mon curseur ?
Récemment, j'ai besoin de rendre à l'Écran l'image du Curseur
une image bitmap. C'est la façon de le faire.
var
& nbsp & nbsp HCursor: THandle
begin
& nbsp & nbsp //Obtenir le handle de la position du curseur
& nbsp & nbsp HCursor := Écran.Les Curseurs[Ord(L'Écran.Curseur)]
& nbsp & nbsp //Dessine l'icône d'une toile
& nbsp & nbsp DrawIconEx(MyBitmap.Toile.Poignée,
& ! & ! & ! & nbsp XPos,Ypos,HCursor,32,32,0,0,DI_NORMAL)
fin
Voir DrawIconEx en Delphi aider pour les combinaisons qui peuvent remplacer DI_NORMAL, comme DI_MASK ou DI_DEFAULTSIZE
Qu'est ce que mon curseur ?
Qu'est ce que mon curseur ? : Plusieurs milliers de conseils pour vous faciliter la vie.
Recemment, j'ai besoin de rendre a l'Ecran l'image du Curseur
une image bitmap. C'est la façon de le faire.
var
& nbsp & nbsp HCursor: THandle
begin
& nbsp & nbsp //Obtenir le handle de la position du curseur
& nbsp & nbsp HCursor := Ecran.Les Curseurs[Ord(L'Ecran.Curseur)]
& nbsp & nbsp //Dessine l'icone d'une toile
& nbsp & nbsp DrawIconEx(MyBitmap.Toile.Poignee,
& ! & ! & ! & nbsp XPos,Ypos,HCursor,32,32,0,0,DI_NORMAL)
fin
Voir DrawIconEx en Delphi aider pour les combinaisons qui peuvent remplacer DI_NORMAL, comme DI_MASK ou DI_DEFAULTSIZE
Qu'est ce que mon curseur ?
By commentfaire
Qu'est ce que mon curseur ? : Plusieurs milliers de conseils pour vous faciliter la vie.