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...........: a.carli@penteres.it 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: a.carli@penteres.it 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.