[Delphi] Cursore immagine

[peste1]

Ciao a tutti.
Ho la necessità di cambiare il cursore a un'immagine TImage e caricare questo cursore da file .cur .

Come posso fare?

Grazie e ciao!

[web ces]

cambiare con un immagine?
o
cambiare quando va su un'immagine?

[alka]

Originariamente inviato da peste1
Ciao a tutti.
Ho la necessità di cambiare il cursore a un'immagine TImage e caricare questo cursore da file .cur .
Come posso fare?

Devi usare la funzione API LoadCursor (per caricarlo dalle risorse compilate con l'applicazione) oppure LoadCursorFromFile per caricarlo da disco.

Il valore restituito è l'handle del cursorse caricato, che puoi impostare direttamente sulla proprietà Cursor del controllo TImage affinchè venga visualizzato quando il puntatore del mouse si sofferma sull'area occupata dal controllo visuale.

Per aggiungere cursori ad un file di risorse da compilare nel progetto, puoi usare lo scarno ma funzionale Image Editor (lo trovi nel menu "Tools").

Il file di risorse si include tramite la direttiva $R.

Ciao!

[peste1]

Ciao grazie per la risposta
Attualmente utilizzo questo codice, solo che il cursore non viene visualizzato:

JvToolBar1.Cursor := LoadCursorFromFile(PChar(ExtractFilePath(Application.ExeName) +'Grafica\Cursori\freccia.cur'));

Il percorso esiste e anche il file .cur
Sapreste darmi qualche consiglio?

Grazie mille :bubu: