Hi Christian,
new day new problem for Cocoa. Should setting a drag image work for Cocoa?
'create the drag
dim theDrag as new DragItemMBS
if not theDrag.Create then return False
'create picture and file…
'start the drag picture
theDrag.AddFlavorFileReference(1, DragFile)
dim OffsetX, OffsetY as integer
OffsetX = theListbox.TrueBoundary.Left
OffsetY = theListbox.TrueBoundary.Top + theListbox.DefaultRowHeight *
theListbox.ListIndex
theDrag.SetDragImage(finalDragPicture, OffsetX, OffsetY, 0)
theDrag.StartDrag OffsetX, OffsetY, 0, OffsetX, OffsetY, theListbox.Width,
theListbox.DefaultRowHeight
I get a nice blank rectangle instead of a picture. The picture "FinalDragImage"
contains the correct data as verified in the debugger. The same code works for
Carbon.
Some of the examples for Drag and Drop like "Drag and Drop with Picture.rbp"
give error message like "Failed to attached Tracker to the window".
Mit freundlichen Grüßen/Regards
Trixi Willius
http://www.mothsoftware.com
Mail Archiver X: The email archiving solution for professionals
_______________________________________________
Mbsplugins_monkeybreadsoftware.info mailing list
[email protected]
https://ml01.ispgateway.de/mailman/listinfo/mbsplugins_monkeybreadsoftware.info
