DragDrop Cursor

[Thomas Lauzi]

 Posted by:  Thomas Lauzi 

Hi NG,
I have a question regarding to dragdrop.
How is the NO-Drop cursor shown??
I return On SAM_DragDrop and On SAM_DRagMove FALSE, but the DragDrop cursor
is not set to the NO-Drop cursor.
So I load manually a NO-Drop cursor, but this is bad to handle. because on
other windows I must load/unload this cursor.The dragdrop sample also does
not explain this.
How does the standard work??

Regards,
Thomas L.

[Christian Astor]

 Posted by:  Christian ASTOR 


The standard method is with IDropSource & IDropTarget interfaces.

[Gerhard Achrainer]

 Posted by:  g.achrainer 

Hi,

in your sample:

Multiline Field: ml2
Message Actions
On SAM_DragEnter
Call SalDragDropDisableDrop ()
On SAM_DragExit
Call SalDragDropEnableDrop ()

should do what you want, hopefully :wink:

Regards,

gerhard.

[Thomas Lauzi]

 Posted by:  Thomas Lauzi 

Yes Gerhard,
this commands I missed, but unfortunatly my code doesn´t work anymore.
I have tree where you can drag-drop folders.
If I replace my cursor loading/unloading with
SalDragDropEnableDrop/SalDragDropDisableDrop my code hangs.

!!CB!! 173
On SAM_DragMove
!
If SalNumberToWindowHandle( wParam ) = hWndItem
! Quelle und Ziel ist er selbst, d.h es werden nur Ordner verschoben
If .. ActionAllowed( SAM_DragMove )
Call SalCursorSet( hWndItem,CURSOR_Drop, CURSOR_DragDrop )
<-SalDragDropEnableDrop
Else
Call SalCursorSet( hWndItem,CURSOR_NoDrop, CURSOR_DragDrop )
<-SalDragDropDisableDrop
Else
! Quelle ist ein anderes Control, d.h. es wird etwas in die Ordner
geschoben
If .. ActionAllowed( PM_DragDropExtern )
Call SalCursorSet( hWndItem,CURSOR_Drop, CURSOR_DragDrop )
<-SalDragDropEnableDrop
Else
Call SalCursorSet( hWndItem,CURSOR_NoDrop, CURSOR_DragDrop )
<-SalDragDropDisableDrop
Call SalSendClassMessage( SAM_DragMove,wParam, lParam )