procedure Move(AShape:TMyShape;Dx,Dy:integer);


Description:


 move a shape or a grouped shape by code.OnShapeDragging event tigged.


Example:


AShape:= MyCAD1.GetSelectedShape;

if AShape <> nilthen

  MyCAD1.Move(AShape,20,40);


See Also:


OnShapeDragginga