Class THMICustomFlowElevator

Unit

hmi_draw_elevador

Declaration

type THMICustomFlowElevator = class(THMICustomElevadorBasico, IColorChangeNotification)

Description

THMICustomFlowElevator

Hierarchy

• TCustomControl
• THMIBasicControl
• THMICustomElevadorBasico
• THMICustomFlowElevator

Overview

Fields

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

Methods

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

Properties

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

Description

Fields

	FInputPolyline: THMIFlowPolyline;

	FOutputPolyline: THMIFlowPolyline;

	FElevatorStates: THMIElevatorFlowZones;

	FCurrentZone: THMIElevatorFlowZone;

	FOwnerZone: THMIElevatorFlowZone;

	FZoneTimer:TTimer;

Methods

	procedure AddNotifyCallback(WhoNotify:IColorChangeNotification);

	procedure RemoveNotifyCallback(WhoRemove:IColorChangeNotification);

	procedure NotifyFree(const WhoWasDestroyed:THMIFlowPolyline);

	procedure NotifyChange(const WhoChanged:THMIFlowPolyline);

	procedure SetInputPolyline(AValue: THMIFlowPolyline);

	procedure SetOutputPolyline(AValue: THMIFlowPolyline);

	procedure SetElevatorStates(AValue: THMIElevatorFlowZones);

	procedure ShowZone(aZone:THMIElevatorFlowZone);

	procedure UpdateFlow; virtual;

	procedure StateChanged(Sender: TObject);

	procedure StatesNeedsComponentState(var CurState: TComponentState);

	procedure NextZone(Sender: TObject);

	procedure Loaded; override;

	procedure UpdateControl; virtual;

	constructor Create(AOwner: TComponent); override;

	destructor Destroy; override;

Properties

	property InputPolyline: THMIFlowPolyline read FInputPolyline write SetInputPolyline;

	property OutputPolyline: THMIFlowPolyline read FOutputPolyline write SetOutputPolyline;

	property ColorAndFlowStates: THMIElevatorFlowZones read FElevatorStates write SetElevatorStates;

	property UseStaticHeaderColor: Boolean read FUseStaticHeaderColor write SetUseStaticHeaderColor default false;

	property UseStaticBodyColor: Boolean read FUseStaticBodyColor write SetUseStaticBodyColor default false;

	property UseStaticFooterColor: Boolean read FUseStaticFooterColor write SetUseStaticFooterColor default false;

---

Generated by PasDoc 0.14.0.