pascalSCADA OPM: crosskeyevents: Class TCrossKeyEvents
From Pascal SCADA OPM
Class TCrossKeyEvents
Unit
Declaration
type TCrossKeyEvents = class(TObject)
Description
Base class of keyboard events emulation.
:
Hierarchy
- TObject
- TCrossKeyEvents
Overview
Fields
 |
FTarget:TWinControl; |
|
FShitfState:TShiftState; |
Methods
|
procedure DoDown(Key: LongWord); dynamic; abstract; |
|
procedure DoUp(Key: LongWord); dynamic; abstract; |
|
function TranlateVirtualKey(Key:Word):LongWord; dynamic; abstract; |
 |
constructor Create(Target:TWinControl); virtual; |
|
procedure SetTarget(Target:TWinControl); |
|
procedure Down(Key: Word); |
|
procedure Up(Key: Word); |
|
procedure Press(Key: Word); |
|
procedure Apply(Shift: TShiftState); virtual; |
|
procedure Unapply(Shift: TShiftState); virtual; |
Description
Fields
|
FTarget:TWinControl; |
|
: Target control of keyboard events. | |
|
FShitfState:TShiftState; |
Methods
|
procedure DoDown(Key: LongWord); dynamic; abstract; |
|
: Emulates the key press event. | |
|
procedure DoUp(Key: LongWord); dynamic; abstract; |
|
: Emulates a key release event. | |
|
function TranlateVirtualKey(Key:Word):LongWord; dynamic; abstract; |
|
: Translate the key code to the widgetset key code. | |
|
constructor Create(Target:TWinControl); virtual; |
|
: Creates the key event emulator. | |
|
procedure SetTarget(Target:TWinControl); |
|
: Sets the target control of key events. | |
|
procedure Down(Key: Word); |
|
: Translate and send the key press event. | |
|
procedure Up(Key: Word); |
|
: Translate and send a key release event. | |
|
procedure Press(Key: Word); |
|
: Translate and send a key press and a key release events. | |
|
procedure Apply(Shift: TShiftState); virtual; |
|
: Apply key modification events (Ctrl, Shift and Alt). | |
|
procedure Unapply(Shift: TShiftState); virtual; |
|
: Removes key modification events (Ctrl, Shift and Alt). | |
Author
- Fabio Luis Girardi <fabio@pascalscada.com>
Generated by PasDoc 0.14.0.