pascalSCADA OPM: ualfakeyboard: Class TpsHMIfrmAlphaKeyboard

Pascal SCADA OPM

Class TpsHMIfrmAlphaKeyboard

Unit

ualfakeyboard

Declaration

type TpsHMIfrmAlphaKeyboard = class(TForm)

Description

TpsHMIfrmAlphaKeyboard

Hierarchy

  • TForm
  • TpsHMIfrmAlphaKeyboard

Overview

Fields

Public Btn_0: TSpeedButton;
Public Btn_1: TSpeedButton;
Public Btn_Q: TSpeedButton;
Public Btn_W: TSpeedButton;
Public Btn_E: TSpeedButton;
Public Btn_R: TSpeedButton;
Public Btn_T: TSpeedButton;
Public Btn_Y: TSpeedButton;
Public Btn_U: TSpeedButton;
Public Btn_I: TSpeedButton;
Public Btn_O: TSpeedButton;
Public Btn_P: TSpeedButton;
Public Btn_2: TSpeedButton;
Public Btn_A: TSpeedButton;
Public Btn_S: TSpeedButton;
Public Btn_D: TSpeedButton;
Public Btn_F: TSpeedButton;
Public Btn_G: TSpeedButton;
Public Btn_H: TSpeedButton;
Public Btn_J: TSpeedButton;
Public Btn_K: TSpeedButton;
Public Btn_L: TSpeedButton;
Public Btn_Cedilla: TSpeedButton;
Public Btn_3: TSpeedButton;
Public Btn_Z: TSpeedButton;
Public Btn_X: TSpeedButton;
Public Btn_C: TSpeedButton;
Public Btn_V: TSpeedButton;
Public Btn_B: TSpeedButton;
Public Btn_N: TSpeedButton;
Public Btn_M: TSpeedButton;
Public Btn_Comma: TSpeedButton;
Public Btn_Dot: TSpeedButton;
Public Btn_Semicolon: TSpeedButton;
Public Btn_4: TSpeedButton;
Public Btn_BackSlash: TSpeedButton;
Public Btn_Quote: TSpeedButton;
Public Btn_Hyphen: TSpeedButton;
Public Btn_Equal: TSpeedButton;
Public Btn_SingleQuote: TSpeedButton;
Public Btn_BracketOpen: TSpeedButton;
Public Btn_Tilde: TSpeedButton;
Public Btn_BracketClose: TSpeedButton;
Public Btn_Slash: TSpeedButton;
Public Btn_F1: TSpeedButton;
Public Btn_5: TSpeedButton;
Public Btn_F2: TSpeedButton;
Public Btn_F3: TSpeedButton;
Public Btn_F4: TSpeedButton;
Public Btn_F5: TSpeedButton;
Public Btn_F6: TSpeedButton;
Public Btn_F7: TSpeedButton;
Public Btn_F8: TSpeedButton;
Public Btn_F9: TSpeedButton;
Public Btn_F10: TSpeedButton;
Public Btn_F11: TSpeedButton;
Public Btn_6: TSpeedButton;
Public Btn_F12: TSpeedButton;
Public Btn_7: TSpeedButton;
Public Btn_8: TSpeedButton;
Public Btn_9: TSpeedButton;
Public Btn_Back: TSpeedButton;
Public Btn_Del: TSpeedButton;
Public Btn_Ins: TSpeedButton;
Public Btn_End: TSpeedButton;
Public Btn_Home: TSpeedButton;
Public Btn_PgUp: TSpeedButton;
Public Btn_PgDown: TSpeedButton;
Public Btn_Esc: TSpeedButton;
Public Btn_Tab: TSpeedButton;
Public Btn_CtrlR: TSpeedButton;
Public Btn_Caps: TSpeedButton;
Public Btn_Shift: TSpeedButton;
Public Btn_Ctrl: TSpeedButton;
Public Btn_Space: TSpeedButton;
Public Btn_Alt: TSpeedButton;
Public Btn_AltGR: TSpeedButton;
Public Btn_Left: TSpeedButton;
Public Btn_Ok: TSpeedButton;
Public Btn_Rigth: TSpeedButton;
Public Btn_Down: TSpeedButton;
Public Btn_Up: TSpeedButton;
Public Timer1: TTimer;
Public Timer2: TTimer;
Protected FFxxKeyGroup:TList;
Protected FNumbersKeyGroup:TList;
Protected FSymbolsKeyGroup:TList;
Protected FNavigationKeyGroup:TList;
Protected FFastNavigationKeyGroup:TList;
Protected FReturnCloseKeyBoard:Boolean;
Protected fStartedAt:TDateTime;

Methods

Public procedure FormCreate(Sender: TObject);
Public procedure FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: LongInt);
Public procedure FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: LongInt);
Public procedure FormMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: LongInt);
Public procedure FormPaint(Sender: TObject);
Public procedure ModifierPress(Sender: TObject);
Public procedure Timer1Timer(Sender: TObject);
Public procedure BtnPress(Sender: TObject);
Public procedure Timer2Timer(Sender: TObject);
Protected procedure DoClose(var CloseAction: TCloseAction); override;
Protected procedure GotoBetterPositionDelayed(Data: PtrInt);
Public constructor Create(TheOwner: TComponent; Target:TWinControl; ShowFxxKeys, ShowTab, ShowCaps, ShowShift, ShowCtrl, ShowAlt, ShowSymbols, ShowNumbers, ShowFastNavigation, ShowNavigation, CloseOnPressEnter:Boolean); overload;
Public destructor Destroy; override;
Public procedure ShowAlongsideOfTheTarget;
Public procedure Notification(AComponent: TComponent; Operation: TOperation); override;

Properties

Published property Target: TWinControl read FTarget;

Description

Fields

Public Btn_0: TSpeedButton;
 
Public Btn_1: TSpeedButton;
 
Public Btn_Q: TSpeedButton;
 
Public Btn_W: TSpeedButton;
 
Public Btn_E: TSpeedButton;
 
Public Btn_R: TSpeedButton;
 
Public Btn_T: TSpeedButton;
 
Public Btn_Y: TSpeedButton;
 
Public Btn_U: TSpeedButton;
 
Public Btn_I: TSpeedButton;
 
Public Btn_O: TSpeedButton;
 
Public Btn_P: TSpeedButton;
 
Public Btn_2: TSpeedButton;
 
Public Btn_A: TSpeedButton;
 
Public Btn_S: TSpeedButton;
 
Public Btn_D: TSpeedButton;
 
Public Btn_F: TSpeedButton;
 
Public Btn_G: TSpeedButton;
 
Public Btn_H: TSpeedButton;
 
Public Btn_J: TSpeedButton;
 
Public Btn_K: TSpeedButton;
 
Public Btn_L: TSpeedButton;
 
Public Btn_Cedilla: TSpeedButton;
 
Public Btn_3: TSpeedButton;
 
Public Btn_Z: TSpeedButton;
 
Public Btn_X: TSpeedButton;
 
Public Btn_C: TSpeedButton;
 
Public Btn_V: TSpeedButton;
 
Public Btn_B: TSpeedButton;
 
Public Btn_N: TSpeedButton;
 
Public Btn_M: TSpeedButton;
 
Public Btn_Comma: TSpeedButton;
 
Public Btn_Dot: TSpeedButton;
 
Public Btn_Semicolon: TSpeedButton;
 
Public Btn_4: TSpeedButton;
 
Public Btn_BackSlash: TSpeedButton;
 
Public Btn_Quote: TSpeedButton;
 
Public Btn_Hyphen: TSpeedButton;
 
Public Btn_Equal: TSpeedButton;
 
Public Btn_SingleQuote: TSpeedButton;
 
Public Btn_BracketOpen: TSpeedButton;
 
Public Btn_Tilde: TSpeedButton;
 
Public Btn_BracketClose: TSpeedButton;
 
Public Btn_Slash: TSpeedButton;
 
Public Btn_F1: TSpeedButton;
 
Public Btn_5: TSpeedButton;
 
Public Btn_F2: TSpeedButton;
 
Public Btn_F3: TSpeedButton;
 
Public Btn_F4: TSpeedButton;
 
Public Btn_F5: TSpeedButton;
 
Public Btn_F6: TSpeedButton;
 
Public Btn_F7: TSpeedButton;
 
Public Btn_F8: TSpeedButton;
 
Public Btn_F9: TSpeedButton;
 
Public Btn_F10: TSpeedButton;
 
Public Btn_F11: TSpeedButton;
 
Public Btn_6: TSpeedButton;
 
Public Btn_F12: TSpeedButton;
 
Public Btn_7: TSpeedButton;
 
Public Btn_8: TSpeedButton;
 
Public Btn_9: TSpeedButton;
 
Public Btn_Back: TSpeedButton;
 
Public Btn_Del: TSpeedButton;
 
Public Btn_Ins: TSpeedButton;
 
Public Btn_End: TSpeedButton;
 
Public Btn_Home: TSpeedButton;
 
Public Btn_PgUp: TSpeedButton;
 
Public Btn_PgDown: TSpeedButton;
 
Public Btn_Esc: TSpeedButton;
 
Public Btn_Tab: TSpeedButton;
 
Public Btn_CtrlR: TSpeedButton;
 
Public Btn_Caps: TSpeedButton;
 
Public Btn_Shift: TSpeedButton;
 
Public Btn_Ctrl: TSpeedButton;
 
Public Btn_Space: TSpeedButton;
 
Public Btn_Alt: TSpeedButton;
 
Public Btn_AltGR: TSpeedButton;
 
Public Btn_Left: TSpeedButton;
 
Public Btn_Ok: TSpeedButton;
 
Public Btn_Rigth: TSpeedButton;
 
Public Btn_Down: TSpeedButton;
 
Public Btn_Up: TSpeedButton;
 
Public Timer1: TTimer;
 
Public Timer2: TTimer;
 
Protected FFxxKeyGroup:TList;
 
Protected FNumbersKeyGroup:TList;
 
Protected FSymbolsKeyGroup:TList;
 
Protected FNavigationKeyGroup:TList;
 
Protected FFastNavigationKeyGroup:TList;
 
Protected FReturnCloseKeyBoard:Boolean;
 
Protected fStartedAt:TDateTime;
 

Methods

Public procedure FormCreate(Sender: TObject);
 
Public procedure FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: LongInt);
 
Public procedure FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: LongInt);
 
Public procedure FormMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: LongInt);
 
Public procedure FormPaint(Sender: TObject);
 
Public procedure ModifierPress(Sender: TObject);
 
Public procedure Timer1Timer(Sender: TObject);
 
Public procedure BtnPress(Sender: TObject);
 
Public procedure Timer2Timer(Sender: TObject);
 
Protected procedure DoClose(var CloseAction: TCloseAction); override;
 
Protected procedure GotoBetterPositionDelayed(Data: PtrInt);
 
Public constructor Create(TheOwner: TComponent; Target:TWinControl; ShowFxxKeys, ShowTab, ShowCaps, ShowShift, ShowCtrl, ShowAlt, ShowSymbols, ShowNumbers, ShowFastNavigation, ShowNavigation, CloseOnPressEnter:Boolean); overload;
 
Public destructor Destroy; override;
 
Public procedure ShowAlongsideOfTheTarget;
 
Public procedure Notification(AComponent: TComponent; Operation: TOperation); override;
 

Properties

Published property Target: TWinControl read FTarget;
 

Generated by PasDoc 0.14.0.