Click above to get retro games delivered to your door ever month!

 Class TButton      Inherits from TControl
--------------------------------------------------------------------------------

 DATA
--------------------------------------------------------------------------------
 bAction         CodeBlock for the click event.
 lDefault        The button has default style.

 METHODS
--------------------------------------------------------------------------------
 New             Constructor from source code.
 ReDefine        Constructor for resources.
 cGetPRG         Generates the source code of the button.
 Click           Mouse left button event handler.
 Colors          Overrides control Color() management.
 cToChar         Generates a data template to build a Dialog.
 GotFocus        Action to be performed when getting the focus.
 Init            Action to be performed on init.
 KeyDown         Action to be performed when a key is pressed down.
 LostFocus       Action to be performed when losing the focus.
 MouseMove       Action to be performed when moving the mouse over.