pascalSCADA OPM: crosskeyevents: Class TCrossKeyEvents

Pascal SCADA OPM

Class TCrossKeyEvents

Unit

crosskeyevents

Declaration

type TCrossKeyEvents = class(TObject)

Description

Base class of keyboard events emulation.

:

Hierarchy

  • TObject
  • TCrossKeyEvents

Overview

Fields

Protected FTarget:TWinControl;
Protected FShitfState:TShiftState;

Methods

Protected procedure DoDown(Key: LongWord); dynamic; abstract;
Protected procedure DoUp(Key: LongWord); dynamic; abstract;
Protected function TranlateVirtualKey(Key:Word):LongWord; dynamic; abstract;
Public constructor Create(Target:TWinControl); virtual;
Public procedure SetTarget(Target:TWinControl);
Public procedure Down(Key: Word);
Public procedure Up(Key: Word);
Public procedure Press(Key: Word);
Public procedure Apply(Shift: TShiftState); virtual;
Public procedure Unapply(Shift: TShiftState); virtual;

Description

Fields

Protected FTarget:TWinControl;

: Target control of keyboard events.

Protected FShitfState:TShiftState;
 

Methods

Protected procedure DoDown(Key: LongWord); dynamic; abstract;

: Emulates the key press event.

Protected procedure DoUp(Key: LongWord); dynamic; abstract;

: Emulates a key release event.

Protected function TranlateVirtualKey(Key:Word):LongWord; dynamic; abstract;

: Translate the key code to the widgetset key code.

Public constructor Create(Target:TWinControl); virtual;

: Creates the key event emulator.

Public procedure SetTarget(Target:TWinControl);

: Sets the target control of key events.

Public procedure Down(Key: Word);

: Translate and send the key press event.

Public procedure Up(Key: Word);

: Translate and send a key release event.

Public procedure Press(Key: Word);

: Translate and send a key press and a key release events.

Public procedure Apply(Shift: TShiftState); virtual;

: Apply key modification events (Ctrl, Shift and Alt).

Public procedure Unapply(Shift: TShiftState); virtual;

: Removes key modification events (Ctrl, Shift and Alt).

Author


Generated by PasDoc 0.14.0.