Discussion :

[Pierrot]

Bonjour

Lors d'un Drag&drop je souhaite utiliser mes propres curseurs. j'utilise l'évenemt onstartdrag dans lequel je lui indique quel curseur utilisé :

screen.cursors[3] := loadcursorfromfile('monsurseur.cur');
dragcursor := 3;

je fais la même jose dans l'évenement ondragover :

screen.cursors[3] := loadcursorfromfile('monsurseur2.cur');
dragcursor := 3;

Lorsque je fait un Drag&drop j'optiens le symbole interdit et pas mon curseur...
merci pour l'aide

[DidiLogic]

Lorsque je fait un Drag&drop j'optiens le symbole interdit et pas mon curseur...

Il me semble que ce symbole est affiché quand la valeur du parametre Accept de l'evenement OnDragOver du composant est à FALSE.

[Lung]

Ton Drag-Drop, mis-à-part le problème de curseur, il marche ?

[Pierrot]

j'ai touvé

en fait il faut simplement mettre :

screen.cursors[-12] := loadcursorfromfile('monsurseur.cur');

je remplace l'image contenue dans le curseur -12 (crNoDrag) et le curseur -13 (CrDrag) par mes curseurs. le tour est joué

[Smortex]

Mieux que d'utiliser un -12 ou autre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Screen.Cursors[crHandPoint] := ...

Pour changer le curseur "Main".

Bon développement !