Sorry to disagree on this. I have already tried a simplistic correction of the 
left and top with shift-X and shift-Y. It does make the image jump to new 
position. However not exactly where you make the mouse-up event. Besides the 
dragging of the outline is not there.

TFE,
http://totallyfreeenergy.zxq.net

--- In [email protected], Doug Hale <del...@...> wrote:
>
> You don't need to drag-and-drop to do that, just figure out how much the 
> mouse has moved since the mouse-button was pushed and change the images  
> .left and .top by that amount.
> 
> Doug
> 
> 
> totallyfreeenergy wrote:
> > This is for achieving drag to new position of a TImage object during 
> > runtime. I had captured the OnMouseDown with dragmode set to dk_manual. I 
> > had set the new X and Y position in the OnDragDrop event. 
> > Image1.BeginDrag(False, 10) as suggested by David. It still doesn't work.
> >
> > Regards
> > TFE,


Reply via email to