Cursor
Résolu
clem68100
Messages postés
15
Date d'inscription
vendredi 11 septembre 2015
Statut
Membre
Dernière intervention
14 décembre 2016
-
5 avril 2016 à 21:47
dubois77 Messages postés 675 Date d'inscription jeudi 17 avril 2008 Statut Membre Dernière intervention 19 février 2019 - 6 avril 2016 à 08:48
dubois77 Messages postés 675 Date d'inscription jeudi 17 avril 2008 Statut Membre Dernière intervention 19 février 2019 - 6 avril 2016 à 08:48
1 réponse
dubois77
Messages postés
675
Date d'inscription
jeudi 17 avril 2008
Statut
Membre
Dernière intervention
19 février 2019
14
6 avril 2016 à 08:48
6 avril 2016 à 08:48
Salut
Une petite recherche avec google te donne beaucoup d'exemples
voici le principe sur les curseurs
Une petite recherche avec google te donne beaucoup d'exemples
voici le principe sur les curseurs
{-----------utilisation d'un curseur prédéfini dans Delphi--------}
Edit1.Cursor:=crCross;// on peut aussi directement l'affecter dans l'inspecteur d'objets
{-----------utilisation d'un curseur perso-----------}
Screen.Cursors[crMyCursor] := LoadCursorFromFile('showcur.cur');
Screen.Cursors[crAutreCurseur] := LoadCursorFromFile('AutreCur.cur');
//Screen.Cursors[]contient les Handles des curseurs utilisables dans l'application.
//LoadCursorFromFile charge un curseur en mémoire et renvoie son Handle
Memo1.Cursor:=crMyCursor;// changement du ceurseur pour le mémo
Button1.Cursor:=crAutreCurseur; // changement du curseur pour le bouton
end;
// les curseurs animés sont dans des fichiers .ani
// par exemple :
Screen.Cursors[crCurseurAnime]:= LoadCursorFromFile('c:\windows\cursors\hourglas.ani');
Button2.cursor:=crCurseurAnime;
