T O P I C R E V I E W |
winner |
Posted - Nov 04 2012 : 05:42:20 I want to toggle the mouseinteract by startdrag and dragend. when mouse drag,imageen response miscroll,and mouse click,imageen response miobjectselect.but it cannot work.
procedure Tfrm1.img1StartDrag(Sender: TObject; var DragObject: TDragObject); begin img1.MouseInteract:=[miScroll]; end;
procedure Tfrm1.img1EndDrag(Sender, Target: TObject; X, Y: Integer); begin img1.MouseInteractVt:=img1.MouseInteractVt+[miObjectSelect]; end; |
1 L A T E S T R E P L I E S (Newest First) |
xequte |
Posted - Nov 06 2012 : 01:31:53 Hi
Sorry, can you please explain this in more detail.
Nigel Xequte Software www.xequte.com nigel@xequte.com
|
|
|