How to make a TImage to enable and disable dragging ..

[Spent]

How to make a TImage to enable and disable dragging by the mouse in run time? Thanks

 

[Supernat03]

You can't enable dragging of a TImage at run-time that I know of. You have to write the code yourself (which is basically an OnMouseDown/OnMouseMove functionality where you simply change the left and top values of the TImage when the mouse moves while a button is down.)

Chris

 

[Spent]

In Delphi there is a :
var x:Timage;
......
On mouseDown
x.BeginDrag(..);
...
On MouseUp
x.EndDrag;

IS this possible in Builder and how?

 

[Supernat03]

In C++ Builder, BeginDrag and EndDrag are methods used for drag and drop/dock operations only. As I explained above, the quickest way to draw the image is to use it's own OnMouseDown/OnMouseMove events to move it. You could get more complicated and draw it on a canvas that doesn't move, which would make it faster (if you needed), but I don't recommend that unless you just have to.

Chris