  wtsFocusColor - Weber Tech Services Control Focus Color Component
  -----------------------------------------------------------------

  Author:  Richard Weber
  Date:    October 14, 2001
  Version: 1.7

  Email Questions and Comments to: RAWDirect@yahoo.com

  This component is a FREEWARE component, you can this component AT YOUR OWN RISK!!
  Just send me a email telling me how much you love this little component :p

  This simple component to change the color of contols as they receieve
  focus when selected.  The component hooks into the screen.OnActiveControlChange
  event and changes the control color as the event is call through delphi, then
  calls the default event if given.

  Development Notes:
  ----------------
  To provide more flexability to other Third-Party controls a InvalidClasses
  property is provided to allow programmers to specify controls to ignore.
  Also the InvalidClasses property doesnt force all the available controls
  in the uses clause.

  Coolness Factor:
  ----------------
  Even though the Color property defined in the TControl it is not Published.
  I used some Polymorphism to type cast the control to TwtsColorControlCustom,
  and all it does is make public the color property.  This allows the component to
  use any TControl decendant without having it in the uses clause.

  A nice little workaround even though it is a small hack is to create stringlists
  that is used to Ignore certain controls that is not compatible with this component.
  I just used the classnames control names found in the RTTI to perform checks.  Could
  slowdown the navigating of components some, but hell a lot faster than doing it
  all by hand!!!

  Revision History:
  1.7 - Removed InvalidClasses Property and used a single list for both name types
  1.6 - Added Version Property
  1.51 - ReFixed bug to set the LastControl, if the active control is invalid
  1.5 - Fixed bug to set the LastControl, if the active control is invalid
  1.4 - Added InvalidNames property
  1.3 - Added InvalidClasses property
  1.2 - Added options to set the Font color
  1.1 - Color can only do the owner set for control owner, freeing forms when
        Last Control causes AccessViolations


Notes on using InvalidNames:
When you find a control that you wish the color and font not be changed
add the classname or component name to the InvalidNames list.
