pascalSCADA OPM: unumerickeyboard: Class TpsHMIfrmNumericKeyBoard

Pascal SCADA OPM

previous page next page

Class TpsHMIfrmNumericKeyBoard

Description

Unit

unumerickeyboard

Declaration

type TpsHMIfrmNumericKeyBoard = class(TForm)

Description

TpsHMIfrmNumericKeyBoard

Hierarchy

TForm
TpsHMIfrmNumericKeyBoard

Overview

Fields

	`Btn_1: TSpeedButton;`
	`Btn_2: TSpeedButton;`
	`Btn_3: TSpeedButton;`
	`Btn_4: TSpeedButton;`
	`Btn_5: TSpeedButton;`
	`Btn_6: TSpeedButton;`
	`Btn_7: TSpeedButton;`
	`Btn_8: TSpeedButton;`
	`Btn_9: TSpeedButton;`
	`Btn_0: TSpeedButton;`
	`Btn_Minus: TSpeedButton;`
	`Btn_DecSeparator: TSpeedButton;`
	`Btn_Del: TSpeedButton;`
	`Btn_Esc: TSpeedButton;`
	`Btn_Back: TSpeedButton;`
	`Btn_Ok: TSpeedButton;`
	`Btn_Left: TSpeedButton;`
	`Btn_Rigth: TSpeedButton;`
	`Timer1: TTimer;`
	`FShowMinus:Boolean;`
	`FShowDecimal:Boolean;`
	`FTarget:TWinControl;`
	`FFormOwner:TCustomForm;`
	`keyboard:TCrossKeyEvents;`
	`fStartedAt:TDateTime;`

Methods

	`procedure FormCreate(Sender: TObject);`
	`procedure BtnPress(Sender: TObject);`
	`procedure Timer1Timer(Sender: TObject);`
	`procedure GotoBetterPosition;`
	`procedure ReturnFocusToTarget;`
	`procedure DoClose(var CloseAction: TCloseAction); override;`
	`constructor Create(TheOwner: TComponent; Target:TWinControl; ShowMinus, ShowDecimal:Boolean); overload;`
	`destructor Destroy; override;`
	`procedure ShowAlongsideOfTheTarget;`
	`procedure Notification(AComponent: TComponent; Operation: TOperation); override;`

Properties

property Target: TWinControl read FTarget;

Description

Fields

	`Btn_1: TSpeedButton;`

	`Btn_2: TSpeedButton;`

	`Btn_3: TSpeedButton;`

	`Btn_4: TSpeedButton;`

	`Btn_5: TSpeedButton;`

	`Btn_6: TSpeedButton;`

	`Btn_7: TSpeedButton;`

	`Btn_8: TSpeedButton;`

	`Btn_9: TSpeedButton;`

	`Btn_0: TSpeedButton;`

	`Btn_Minus: TSpeedButton;`

	`Btn_DecSeparator: TSpeedButton;`

	`Btn_Del: TSpeedButton;`

	`Btn_Esc: TSpeedButton;`

	`Btn_Back: TSpeedButton;`

	`Btn_Ok: TSpeedButton;`

	`Btn_Left: TSpeedButton;`

	`Btn_Rigth: TSpeedButton;`

	`Timer1: TTimer;`

	`FShowMinus:Boolean;`

	`FShowDecimal:Boolean;`

	`FTarget:TWinControl;`

	`FFormOwner:TCustomForm;`

	`keyboard:TCrossKeyEvents;`

	`fStartedAt:TDateTime;`

Methods

	`procedure FormCreate(Sender: TObject);`

	`procedure BtnPress(Sender: TObject);`

	`procedure Timer1Timer(Sender: TObject);`

	`procedure GotoBetterPosition;`

	`procedure ReturnFocusToTarget;`

	`procedure DoClose(var CloseAction: TCloseAction); override;`

	`constructor Create(TheOwner: TComponent; Target:TWinControl; ShowMinus, ShowDecimal:Boolean); overload;`

	`destructor Destroy; override;`

	`procedure ShowAlongsideOfTheTarget;`

	`procedure Notification(AComponent: TComponent; Operation: TOperation); override;`

Properties

	`property Target: TWinControl read FTarget;`

Generated by PasDoc 0.14.0.

previous page start next page