TDragSelect 1.0 
(c) 1999,2000 David Lively
dlively@intellecare.com

Run the included sample application (Delphi 5 format) for a demonstration. TDragSelect subclasses a target TWinControl descendant
such as a form, panel, or scrollbox and intercepts the WM_LButtonDown, WM_LButtonUp, and WM_MouseMove messages. It uses these messages
to control a click-and-drag focus rectangle of variable line thickness for the purpose of selecting an area within the target control. 
Upon completion, an OnSelect event is fired with the coordinates of the selected rectangle relative to the target control. 

To add to a new application:
1. Install the component into DCLUSR50 or a custom package (not included).
2. Drop TDragSelect on a form
3. Set the TargetControl property to the desired TWinControl descendant
4. Run the application.
5. Click and drag within the TargetControl to see the selection rectangle. 

You'll want to handle the DragSelect.OnSelect event to complete your selection logic.

Send me an email! DLively@intellecare.com.