 TMovingPanel
 Freeware Component - Casey Charlton  18/11/95
                      casey@larouss.demon.co.uk

 You may use or modify this code as you like.

 Version 1.1 -  Stopped re-draw when clicked but not moved.

 Known problems - It is possible to move the panel outside
                  of the visible area of it's Parent control.
                  This should be checked for in the OnMouseUp
                  event if you want to prevent or correct this.

 TMovingPanel provides a TPanel that can be dragged around
 within it's Parent control, or can move it's Parent control
 when it is dragged.
 The property  MoveWho  decides what should be dragged when
 the panel is clicked upon. It can be set to mwNone for no
 dragging (in which case it acts exactly like TPanel),
 mwSelf to drag itself around within it's Parent,
 or mwParent to drag it's Parent around.

 This code is based upon original code by Anders Ohlsson
                                          ao@sto.fao.se


Run the demo program to see it working.

I make no warranties or guarantees about it's stability, but I
think it's OK !
