Component Name..: TKeyboard
File Version....: 1.0a
File Description: New component to implement an input Keyboard.
Target..........: Delphi 2.0 / 3.0
Author Name.....: Andrea Carli
EMail...........:
[email protected]
File Status.....: Freeware
Category........: Visible Components.
-------------------------------------------------------------------
////\\\\////\\\\////\\\\////\\\\////\\\\////\\\\////\\\\////\\\\///
-------------------------------------------------------------------
Long description:
-----------------
TKeyboard component
Copyright (c) 1997 Andrea Carli
Portions Copyright (c) 1995,96 Borland International
Relevant design-runtime properties: KeyCaptions: TStrings;
KeyIndex: TKeyboardBtn; [R/O]
NullValue: String;
Relevant runtime properties: Value: String; [R/O]
Relevant runtime methods:
Enable ( Index: TKeyboardBtn, Value: Boolean )
Down ( Index: TKeyboardBtn, Value: Boolean )
KeyIndex as KeyCaptions.Strings[index] start from 0.
Limitations: Max 30 keys (TKeyboardBtn goes from 0 to 29) may be
increased changing the source code and recompiling the component.
This component display a keyboard in wich each key had a caption
given by the 'KeyCaptions' property; setting this property make the
corresponding button visible and enabled.
Only a key remain pressed at time or none at all, in the first
case the 'Value' property (runtime) of the component is the caption
of the pressed key; otherwise is given by the 'NullValue' property.
'KeyIndex' property (runtime) represent the current button selected
(not necessarily pressed!).
Using methods 'Enable' or 'Down' you can Enable/Disable or
Press/Pull a particular key.
For information, BUG REPORT and suggestions (very appreciated)
e-mail me at:
[email protected]
I decided to make this component freeware since i believe in this
kind of software distribution, i have solve lot of problems, bugs
and learn more about this language thanks to source listings founded
in freeware sites.
LET'S GIVE OUR CONTRIBUTION TO THIS CAUSE!
WARNING! THE CODE IS PROVIDED AS IS WITH NO GUARANTEES OF ANY KIND!
USE THIS AT YOUR OWN RISK - YOU ARE THE ONLY PERSON RESPONSIBLE FOR
ANY DAMAGE THIS CODE MAY CAUSE - YOU HAVE BEEN WARNED!
-------------------------------------------------------------------
////\\\\////\\\\////\\\\////\\\\////\\\\////\\\\////\\\\////\\\\///
-------------------------------------------------------------------
History :
06/05/97 - Version 1.0 :
First version.
10/09/97 - Version 1.0a :
Delphi 3 version.
