Class THMICustomFlowValve
Unit
Declaration
type THMICustomFlowValve = class(THMICustomBasicValve, IColorChangeNotification)
Description
No description available, ancestor THMICustomBasicValve description follows
THMIBasicValve
Hierarchy
- TCustomControl
- THMIBasicControl
- THMICustomBasicValve
- THMICustomFlowValve
Overview
Fields
FInputPolyline: THMIFlowPolyline; |
|
FOutputPolyline: THMIFlowPolyline; |
|
FValveStates: THMIFlowZones; |
|
FCurrentZone: THMIFlowZone; |
|
FOwnerZone: THMIFlowZone; |
|
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 SetValveStates(AValue: THMIFlowZones); |
|
procedure ShowZone(aZone:THMIFlowZone); |
|
procedure UpdateValve; virtual; |
|
procedure UpdateFlow; virtual; |
|
procedure ValveStateChanged(Sender: TObject); |
|
procedure ValveStateNeedsComponentState(var CurState: TComponentState); |
|
procedure NextZone(Sender: TObject); |
|
procedure Loaded; override; |
|
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: THMIFlowZones read FValveStates write SetValveStates; |
Description
Fields
FInputPolyline: THMIFlowPolyline; |
|
FOutputPolyline: THMIFlowPolyline; |
|
FValveStates: THMIFlowZones; |
|
FCurrentZone: THMIFlowZone; |
|
FOwnerZone: THMIFlowZone; |
|
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 SetValveStates(AValue: THMIFlowZones); |
|
procedure ShowZone(aZone:THMIFlowZone); |
|
procedure UpdateValve; virtual; |
|
procedure UpdateFlow; virtual; |
|
procedure ValveStateChanged(Sender: TObject); |
|
procedure ValveStateNeedsComponentState(var CurState: TComponentState); |
|
procedure NextZone(Sender: TObject); |
|
procedure Loaded; override; |
|
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: THMIFlowZones read FValveStates write SetValveStates; |
|
Generated by PasDoc 0.14.0.