pascalSCADA OPM: Tag: Class TTag
From Pascal SCADA OPM
Class TTag
Unit
Declaration
type TTag = class(TComponent)
Description
TTag
Hierarchy
- TComponent
- TTag
Overview
Fields
FReadOKNotificationList:TTagNotificationList; |
|
FReadFaultNotificationList:TTagNotificationList; |
|
FWriteOKNotificationList:TTagNotificationList; |
|
FWriteFaultNotificationList:TTagNotificationList; |
|
FChangeNotificationList:TTagNotificationList; |
|
FTagRemovalNotificationList:TTagNotificationList; |
|
PAutoRead:Boolean; |
|
PAutoWrite:Boolean; |
|
PCommReadErrors:Cardinal; |
|
PCommReadOK:Cardinal; |
|
PCommWriteErrors:Cardinal; |
|
PCommWriteOk:Cardinal; |
|
PRack:Cardinal; |
|
PSlot:Cardinal; |
|
PStation:Cardinal; |
|
PFile_DB:Cardinal; |
|
PAddress:Cardinal; |
|
PSubElement:Cardinal; |
|
PSize:Cardinal; |
|
PPath:AnsiString; |
|
PReadFunction:Cardinal; |
|
PWriteFunction:Cardinal; |
|
PRetries:Cardinal; |
|
PUpdateTime:TRefreshTime; |
|
POnReadOk:TNotifyEvent; |
|
POnReadFail:TNotifyEvent; |
|
POnWriteOk:TNotifyEvent; |
|
POnWriteFail:TNotifyEvent; |
|
POnValueChangeFirst:TNotifyEvent; |
|
POnValueChangeLast:TNotifyEvent; |
|
POnAsyncValueChange:TASyncValueChangeNotify; |
|
POnUpdate:TNotifyEvent; |
|
PGUID:AnsiString; |
|
PFirstUpdate:Boolean; |
Methods
procedure AsyncNotifyChange(data:Pointer); virtual; |
|
function GetValueChangeData:Pointer; virtual; |
|
procedure ReleaseChangeData(data:Pointer); virtual; |
|
procedure NotifyReadOk; |
|
procedure NotifyReadFault; |
|
procedure NotifyUpdate; |
|
procedure NotifyWriteOk; |
|
procedure NotifyWriteFault; |
|
procedure NotifyChange; |
|
procedure IncCommReadOK(value:Cardinal); |
|
procedure IncCommReadFaults(value:Cardinal); |
|
procedure IncCommWriteOK(value:Cardinal); |
|
procedure IncCommWriteFaults(value:Cardinal); |
|
function IndexOf(List:TTagNotificationList; aHandler:TNotifyEvent):Integer; |
|
procedure AddToList(var List:TTagNotificationList; const aHandler:TNotifyEvent); |
|
procedure DeleteFromList(var List:TTagNotificationList; const aIndex:Integer); |
|
procedure AddReadOkHandler(aCallBack:TNotifyEvent); |
|
procedure AddReadFaultHandler(aCallBack:TNotifyEvent); |
|
procedure AddWriteOkHandler(aCallBack:TNotifyEvent); |
|
procedure AddWriteFaultHandler(aCallBack:TNotifyEvent); |
|
procedure AddTagChangeHandler(aCallBack:TNotifyEvent); |
|
procedure AddRemoveTagHandler(aCallBack:TNotifyEvent); |
|
procedure RemoveAllHandlersFromObject(aObject:TObject); |
|
function CountObjectsLinkedWithTagChangeHandler:Integer; |
|
function GetObjectLinkedWithTagChangeHandler(Index:Integer):TObject; |
Properties
property AutoRead: Boolean read PAutoRead; |
|
property AutoWrite: Boolean read PAutoWrite; |
|
property CommReadErrors: Cardinal read PCommReadErrors; |
|
property CommReadsOK: Cardinal read PCommReadOK; |
|
property CommWriteErrors: Cardinal read PCommWriteErrors; |
|
property CommWritesOk: Cardinal read PCommWriteOk; |
|
property PLCRack: Cardinal read PRack; |
|
property PLCSlot: Cardinal read PSlot; |
|
property PLCStation: Cardinal read PStation; |
|
property MemFile_DB: Cardinal read PFile_DB; |
|
property MemAddress: Cardinal read PAddress; |
|
property MemSubElement: Cardinal read PSubElement; |
|
property MemReadFunction: Cardinal read PReadFunction; |
|
property MemWriteFunction: Cardinal read PWriteFunction; |
|
property Retries: Cardinal read PRetries; |
|
property RefreshTime: TRefreshTime read PUpdateTime stored false; |
|
property UpdateTime: TRefreshTime read PUpdateTime; |
|
property Size: Cardinal read PSize; |
|
property LongAddress: AnsiString read PPath; |
|
property OnReadOK: TNotifyEvent read POnReadOk write POnReadOk; |
|
property OnReadFail: TNotifyEvent read POnReadFail write POnReadFail; |
|
property OnWriteOk: TNotifyEvent read POnWriteOk write POnWriteOk; |
|
property OnWriteFail: TNotifyEvent read POnWriteFail write POnWriteFail; |
|
property OnValueChange: TNotifyEvent read POnValueChangeLast write POnValueChangeLast stored false; |
|
property OnValueChangeLast: TNotifyEvent read POnValueChangeLast write POnValueChangeLast; |
|
property OnValueChangeFirst: TNotifyEvent read POnValueChangeFirst write POnValueChangeFirst; |
|
property OnUpdate: TNotifyEvent read POnUpdate write POnUpdate; |
|
property OnAsyncValueChange: TASyncValueChangeNotify read POnAsyncValueChange write POnAsyncValueChange; |
Description
Fields
FReadOKNotificationList:TTagNotificationList; |
|
FReadFaultNotificationList:TTagNotificationList; |
|
FWriteOKNotificationList:TTagNotificationList; |
|
FWriteFaultNotificationList:TTagNotificationList; |
|
FChangeNotificationList:TTagNotificationList; |
|
FTagRemovalNotificationList:TTagNotificationList; |
|
PAutoRead:Boolean; |
|
|
: Stores if the tag will be updated automatically. | |
PAutoWrite:Boolean; |
|
|
: Stores if the tag will write their value automatically. | |
PCommReadErrors:Cardinal; |
|
|
: Stores the counter of failed reads. | |
PCommReadOK:Cardinal; |
|
|
: Stores the counter of successful reads. | |
PCommWriteErrors:Cardinal; |
|
|
: Stores the counter of failed writes. | |
PCommWriteOk:Cardinal; |
|
|
: Stores the counter of successful writes. | |
PRack:Cardinal; |
|
|
: Stores the device Rack number of the tag. | |
PSlot:Cardinal; |
|
|
: Stores the device Slot number of the tag. | |
PStation:Cardinal; |
|
|
: Stores the device Station address of the tag. | |
PFile_DB:Cardinal; |
|
|
: Stores the File/DB number of the tag. | |
PAddress:Cardinal; |
|
|
: Stores the device memory address of the tag. | |
PSubElement:Cardinal; |
|
|
: Stores the device sub-memory address of the tag. | |
PSize:Cardinal; |
|
|
: Stores how many memories are being mapped. | |
PPath:AnsiString; |
|
|
: Stores the textual memory address of the tag. | |
PReadFunction:Cardinal; |
|
|
: Stores the function code to read the values of the tag. | |
PWriteFunction:Cardinal; |
|
|
: Stores the function code to write the values of the tag. | |
PRetries:Cardinal; |
|
|
: Stores the | |
PUpdateTime:TRefreshTime; |
|
|
: Stores the update time of the tag. | |
POnReadOk:TNotifyEvent; |
|
|
: Stores the event to be called when a read has success. | |
POnReadFail:TNotifyEvent; |
|
|
: Stores the event to be called when a read fail occurs. | |
POnWriteOk:TNotifyEvent; |
|
|
: Stores the event to be called when a value is written successfully on device. | |
POnWriteFail:TNotifyEvent; |
|
|
: Stores the event called when a write of tag value has a failed. | |
POnValueChangeFirst:TNotifyEvent; |
|
|
: Stores the event called when the tag value changes, BEFORE notify the dependents of the tag. | |
POnValueChangeLast:TNotifyEvent; |
|
|
: Stores the event called when the tag value changes, AFTER notify the dependents of the tag. | |
POnAsyncValueChange:TASyncValueChangeNotify; |
|
|
: Stores asynchronous event that notifies when the tag value changes. | |
POnUpdate:TNotifyEvent; |
|
|
: Stores the event called when the tag value was updated. | |
PGUID:AnsiString; |
|
|
: Stores the unique tag identification. | |
PFirstUpdate:Boolean; |
|
|
: First tag update? so fires | |
Methods
procedure AsyncNotifyChange(data:Pointer); virtual; |
|
|
: Call the assynchronous tag value change. | |
function GetValueChangeData:Pointer; virtual; |
|
|
: Return a copy of the Tag value for each assynchronous event calls. | |
procedure ReleaseChangeData(data:Pointer); virtual; |
|
|
: Release a copy of a tag value of one assynchronous event call. | |
procedure NotifyReadOk; |
|
|
: Notifies when a successful read occurs. | |
procedure NotifyReadFault; |
|
|
: Notifies when a read fault occurs. | |
procedure NotifyUpdate; |
|
|
: Notifies when the tag value was updated. | |
procedure NotifyWriteOk; |
|
|
: Notifies when a successful write occurs. | |
procedure NotifyWriteFault; |
|
|
: Notifies when a write fault occurs. | |
procedure NotifyChange; |
|
|
: Notifies when the tag value changes. | |
procedure IncCommReadOK(value:Cardinal); |
|
|
: Increments the counter of successful reads. | |
procedure IncCommReadFaults(value:Cardinal); |
|
|
: Increments the counter of faulted reads. | |
procedure IncCommWriteOK(value:Cardinal); |
|
|
: Increments the counter of successful writes. | |
procedure IncCommWriteFaults(value:Cardinal); |
|
|
: Increments the counter of faulted writes. | |
function IndexOf(List:TTagNotificationList; aHandler:TNotifyEvent):Integer; |
|
procedure AddToList(var List:TTagNotificationList; const aHandler:TNotifyEvent); |
|
procedure DeleteFromList(var List:TTagNotificationList; const aIndex:Integer); |
|
procedure AddReadOkHandler(aCallBack:TNotifyEvent); |
|
procedure AddReadFaultHandler(aCallBack:TNotifyEvent); |
|
procedure AddWriteOkHandler(aCallBack:TNotifyEvent); |
|
procedure AddWriteFaultHandler(aCallBack:TNotifyEvent); |
|
procedure AddTagChangeHandler(aCallBack:TNotifyEvent); |
|
procedure AddRemoveTagHandler(aCallBack:TNotifyEvent); |
|
procedure RemoveAllHandlersFromObject(aObject:TObject); |
|
function CountObjectsLinkedWithTagChangeHandler:Integer; |
|
function GetObjectLinkedWithTagChangeHandler(Index:Integer):TObject; |
|
Properties
property AutoRead: Boolean read PAutoRead; |
|
|
: If | |
property AutoWrite: Boolean read PAutoWrite; |
|
|
: If | |
property CommReadErrors: Cardinal read PCommReadErrors; |
|
|
: Tell how many read errors occurred. | |
property CommReadsOK: Cardinal read PCommReadOK; |
|
|
: Tells the count of successful reads. | |
property CommWriteErrors: Cardinal read PCommWriteErrors; |
|
|
: Tell how many write errors occurred. | |
property CommWritesOk: Cardinal read PCommWriteOk; |
|
|
: Tells the count of successful writes. | |
property PLCRack: Cardinal read PRack; |
|
|
: Device Rack that contains the memory being mapped, if applicable. See also | |
property PLCSlot: Cardinal read PSlot; |
|
|
: Device Slot that contains the memory being mapped, if applicable. See also | |
property PLCStation: Cardinal read PStation; |
|
|
: Device address that contains the memory being mapped, if applicable. See also | |
property MemFile_DB: Cardinal read PFile_DB; |
|
|
: Device File/DB that contains the memory being mapped, if applicable. | |
property MemAddress: Cardinal read PAddress; |
|
|
: The address of the memory being mapped. | |
property MemSubElement: Cardinal read PSubElement; |
|
|
: The sub-memory address, if applicable. | |
property MemReadFunction: Cardinal read PReadFunction; |
|
|
: Protocol driver function that will read the memory being mapped. | |
property MemWriteFunction: Cardinal read PWriteFunction; |
|
|
: Protocol driver function that will write values in the memory being mapped. | |
property Retries: Cardinal read PRetries; |
|
|
: Number of retries of read/write of this memory. | |
property RefreshTime: TRefreshTime read PUpdateTime stored false; |
|
|
: Update time of the tag, in milliseconds. | |
property UpdateTime: TRefreshTime read PUpdateTime; |
|
|
: Update time of the tag, in milliseconds. | |
property Size: Cardinal read PSize; |
|
|
: Number of memories being mapped, if applicable. | |
property LongAddress: AnsiString read PPath; |
|
|
: Long address (text), if supported by the protocol driver. | |
property OnReadOK: TNotifyEvent read POnReadOk write POnReadOk; |
|
|
: Event called to notify when a successful read occurs. | |
property OnReadFail: TNotifyEvent read POnReadFail write POnReadFail; |
|
|
: Event called when a read fault occurs. | |
property OnWriteOk: TNotifyEvent read POnWriteOk write POnWriteOk; |
|
|
: Event called to notify when a write of the tag value has success. | |
property OnWriteFail: TNotifyEvent read POnWriteFail write POnWriteFail; |
|
|
: Event called when a write fault occurs. | |
property OnValueChange: TNotifyEvent read POnValueChangeLast write POnValueChangeLast stored false; |
|
|
: Event called when the tag value changes, AFTER notify all tag dependents. | |
property OnValueChangeLast: TNotifyEvent read POnValueChangeLast write POnValueChangeLast; |
|
|
: Event called when the tag value changes, AFTER notify all tag dependents. | |
property OnValueChangeFirst: TNotifyEvent read POnValueChangeFirst write POnValueChangeFirst; |
|
|
: Event called when the tag value changes, BEFORE notify all tag dependents. | |
property OnUpdate: TNotifyEvent read POnUpdate write POnUpdate; |
|
|
: Event called when the tag value was updated. | |
property OnAsyncValueChange: TASyncValueChangeNotify read POnAsyncValueChange write POnAsyncValueChange; |
|
|
: Asynchronous event called when the tag value changes. | |
Generated by PasDoc 0.14.0.