pascalSCADA OPM: hmi_draw_elevador: Class THMICustomFlowElevator

Pascal SCADA OPM

Class THMICustomFlowElevator

Unit

hmi_draw_elevador

Declaration

type THMICustomFlowElevator = class(THMICustomElevadorBasico, IColorChangeNotification)

Description

THMICustomFlowElevator

Hierarchy

Overview

Fields

Protected FInputPolyline: THMIFlowPolyline;
Protected FOutputPolyline: THMIFlowPolyline;
Protected FElevatorStates: THMIElevatorFlowZones;
Protected FCurrentZone: THMIElevatorFlowZone;
Protected FOwnerZone: THMIElevatorFlowZone;
Protected FZoneTimer:TTimer;

Methods

Protected procedure AddNotifyCallback(WhoNotify:IColorChangeNotification);
Protected procedure RemoveNotifyCallback(WhoRemove:IColorChangeNotification);
Protected procedure NotifyFree(const WhoWasDestroyed:THMIFlowPolyline);
Protected procedure NotifyChange(const WhoChanged:THMIFlowPolyline);
Protected procedure SetInputPolyline(AValue: THMIFlowPolyline);
Protected procedure SetOutputPolyline(AValue: THMIFlowPolyline);
Protected procedure SetElevatorStates(AValue: THMIElevatorFlowZones);
Protected procedure ShowZone(aZone:THMIElevatorFlowZone);
Protected procedure UpdateFlow; virtual;
Protected procedure StateChanged(Sender: TObject);
Protected procedure StatesNeedsComponentState(var CurState: TComponentState);
Protected procedure NextZone(Sender: TObject);
Protected procedure Loaded; override;
Protected procedure UpdateControl; virtual;
Public constructor Create(AOwner: TComponent); override;
Public destructor Destroy; override;

Properties

Protected property InputPolyline: THMIFlowPolyline read FInputPolyline write SetInputPolyline;
Protected property OutputPolyline: THMIFlowPolyline read FOutputPolyline write SetOutputPolyline;
Protected property ColorAndFlowStates: THMIElevatorFlowZones read FElevatorStates write SetElevatorStates;
Protected property UseStaticHeaderColor: Boolean read FUseStaticHeaderColor write SetUseStaticHeaderColor default false;
Protected property UseStaticBodyColor: Boolean read FUseStaticBodyColor write SetUseStaticBodyColor default false;
Protected property UseStaticFooterColor: Boolean read FUseStaticFooterColor write SetUseStaticFooterColor default false;

Description

Fields

Protected FInputPolyline: THMIFlowPolyline;
 
Protected FOutputPolyline: THMIFlowPolyline;
 
Protected FElevatorStates: THMIElevatorFlowZones;
 
Protected FCurrentZone: THMIElevatorFlowZone;
 
Protected FOwnerZone: THMIElevatorFlowZone;
 
Protected FZoneTimer:TTimer;
 

Methods

Protected procedure AddNotifyCallback(WhoNotify:IColorChangeNotification);
 
Protected procedure RemoveNotifyCallback(WhoRemove:IColorChangeNotification);
 
Protected procedure NotifyFree(const WhoWasDestroyed:THMIFlowPolyline);
 
Protected procedure NotifyChange(const WhoChanged:THMIFlowPolyline);
 
Protected procedure SetInputPolyline(AValue: THMIFlowPolyline);
 
Protected procedure SetOutputPolyline(AValue: THMIFlowPolyline);
 
Protected procedure SetElevatorStates(AValue: THMIElevatorFlowZones);
 
Protected procedure ShowZone(aZone:THMIElevatorFlowZone);
 
Protected procedure UpdateFlow; virtual;
 
Protected procedure StateChanged(Sender: TObject);
 
Protected procedure StatesNeedsComponentState(var CurState: TComponentState);
 
Protected procedure NextZone(Sender: TObject);
 
Protected procedure Loaded; override;
 
Protected procedure UpdateControl; virtual;
 
Public constructor Create(AOwner: TComponent); override;
 
Public destructor Destroy; override;
 

Properties

Protected property InputPolyline: THMIFlowPolyline read FInputPolyline write SetInputPolyline;
 
Protected property OutputPolyline: THMIFlowPolyline read FOutputPolyline write SetOutputPolyline;
 
Protected property ColorAndFlowStates: THMIElevatorFlowZones read FElevatorStates write SetElevatorStates;
 
Protected property UseStaticHeaderColor: Boolean read FUseStaticHeaderColor write SetUseStaticHeaderColor default false;
 
Protected property UseStaticBodyColor: Boolean read FUseStaticBodyColor write SetUseStaticBodyColor default false;
 
Protected property UseStaticFooterColor: Boolean read FUseStaticFooterColor write SetUseStaticFooterColor default false;
 

Generated by PasDoc 0.14.0.