Bonjour,



Je vous file une astuce trouvée dans une ancienne LST :



HandleChamp32 est un entier long

HandleBitmap32 est un entier

LargeurCurseur est un entier

HauteurCurseur est un entier



HandleChamp32=Handle(NomChamp)

HandleBitmap32=TypeCurseur//1//null

LargeurCurseur=9

HauteurCurseur



//Création d'un curseur (détruit automatiquement le curseur précédent; le
curseur créé est par défaut invisible)

AppelDll32("User32",...//Nom du module Windows qui contient la fonction
Windows à utiliser

"CreateCaret",... //Nom de la fonction à utiliser : fonction de
création de curseur de champ de saisie

HandleChamp32,...//Handle de la fenêtre

HandleBitmap32,...//Handle du bitmap à afficher, ou NULL pour
un
noir, et 1 pour gris

LargeurCurseur,...//Largeur en unité logique, NULL pour la
largeur systeme par défaut

HauteurCurseur) //Hauteur en unité logique, NULL pour la
hauteur
systeme par défaut


--
Ed en Ligne



"Paty 1er" <mylelec@hotmail.com> a écrit dans le message de news:
431f62d5@news.pcsoft.fr...