================================================================
TKeybar V1.00
================================================================

Contents :

1.What it can
2.Display
3.Mouseevent
4.Use TKeybar at you own risk
5.E-Mail

1.What it can

The TKeybar-component is an updated TStatusbar, so it works like the
Statusbar of Turbo Vision (Borland Pascal 7.0 for DOS)
It can :

Display Functionskey
Trigger an OnMouseDown-Event

2.Display :

The component display 10 panels in which you can tell the user what
the functionkeys do. If the user press the <SHIFT> <CTRL> or
<ALT>-Key the text in the panels will switch.

How to use :

- Place the component on your form.
- Edit the stringlist for 'Keys_Normal', 'Keys_Shift'..
- Create an 'OnKeyDown'- and 'OnKeyUp'-Event of your form.
- Add following line:
    component.KeyState := Shift;

3.Mouseevent

The component has two read-only properties : 'Function_Key' and
'Special_Key' (both from type Byte). The first property has a range
from 1 to 10 and is set by the component when the user clicks with
the left mousebutton in a panel of the component. The second property
has following values:
  0 : no specialkey pressed
 10 : <SHIFT> is pressed
 20 : <CTRL>  is pressed
 30 : <ALT>   is pressed

How to use :

- Create an 'OnMouseDown'-Event of the component.
- Add following line:
    Case component.Function_Key + component.Special_Key of
      1 : Do what F1 do
       ...
    end;

4.USE TKeyBar AT YOUR OWN RISK.                             
  
I AM NOT RESPONSIBLE FOR ANY HARM THIS COMPONENT MIGHT CAUSE!! 
(This means that if your computer blows up or does any other   
strange things or something else happens and the TKeybar 
caused this problem I will not be responsible!!!)             
                                                                
5.E-Mail

Enjoy,                                                         
Thomas Zakostelsky

E-Mail : Zako@afried.mhs.compuserve.com	or
         Thomas.Zakostelsky@teleweb.at 

                                                                
================================================================
