I generate an image in a Canvas and I add a Drag and Drop feature, but I have a problem with it.
More specifically, beside the DragItem.Destination
who is always Nil
(read my other report), in the below if
block, only the If
line generate the png file in the Mouse released folder.
Used If
block:
// Store the larger or the standard image
If Keyboard.OSKey Then
// Larger image size
My_Pict = Custom_Large_Pict
Else
// Standard Image size
My_Pict = Me.Backdrop
End If
In short, I generate a large (less that 600 x 600 pixels @ 72 dpi) image that I resize to the definitive size (called stardard above). IfI press the OSKey (Cmd on MacOS, not yet tested on WIndows 10), the code will save the larger image. This never happens.
But: the smaller image is always saved / when I click in the Save Larger PushButton, my larger file is saved.
Also: the DragPicture is the larger one.
The code is in Canvas.MouseDrag
(MouseDown
only have Return True
).
PS: I had to reboot yesterday to make the project save the drag to disk. Before that (changing nothing but Internet OFF and FireFox not running), I made no change at all.