Class TLineGeometryObj

Unit

Declaration

type TLineGeometryObj = class(TDSSObject)

Description

No description available, ancestor TDSSObject description follows
No description available, ancestor TNamedObject description follows

this is a GUID compliant to RFC 4122, v4

Hierarchy

Overview

Fields

Public FPhaseChoice: pConductorChoiceArray;
Public FNConds: Integer;
Public FNPhases: Integer;
Public FWireData: pConductorDataArray;
Public FX: pDoubleArray;
Public FY: pDoubleArray;
Public FUnits: pIntegerArray;
Public FLastUnit: Integer;
Public DataChanged: Boolean;
Public FReduce: LongBool;
Public FActiveCond: Integer;
Public FLineData: TLineConstants;
Public NormAmps: Double;
Public EmergAmps: Double;
Public NumAmpRatings: Integer;
Public AmpRatings: array of Double;
Public FLineType: Integer;
Public LineSpacingObj: TLineSpacingObj;

Methods

Public procedure ChangeLineConstantsType(newPhaseChoice: ConductorChoice);
Public procedure set_Nconds(const Value: Integer);
Public procedure set_Nphases(const Value: Integer);
Public procedure set_ActiveCond(const Value: Integer);
Public function Get_YCmatrix(f, Lngth: Double; Units: Integer): Tcmatrix;
Public function Get_Zmatrix(f, Lngth: Double; Units: Integer): Tcmatrix;
Public function Get_RhoEarth: Double;
Public procedure Set_RhoEarth(const Value: Double);
Public function get_Nconds: Integer;
Public procedure UpdateLineGeometryData(f: Double);
Public function Get_FX(i: Integer): Double;
Public function Get_FY(i: Integer): Double;
Public function Get_FUnits(i: Integer): Integer;
Public function Get_ConductorName(i: Integer): String;
Public function Get_ConductorData(i: Integer): TConductorDataObj;
Public procedure Set_FX(i: Integer; Value: Double);
Public procedure Set_FY(i: Integer; Value: Double);
Public procedure Set_FUnits(i: Integer; Value: Integer);
Public function Get_PhaseChoice(i: Integer): ConductorChoice;
Public constructor Create(ParClass: TDSSClass; const LineGeometryName: String);
Public destructor Destroy; OVERRIDE;
Public procedure PropertySideEffects(Idx: Integer; previousIntVal: Integer = 0); override;
Public procedure MakeLike(OtherPtr: Pointer); override;
Public procedure DumpProperties(F: TFileStream; Complete: Boolean; Leaf: Boolean = False); OVERRIDE;
Public procedure SaveWrite(F: TFileStream); OVERRIDE;
Public procedure LoadSpacingAndWires(Spc: TLineSpacingObj; Wires: pConductorDataArray);

Properties

Public property Nconds: Integer READ get_Nconds WRITE set_Nconds;
Public property Nphases: Integer READ FNphases WRITE set_Nphases;
Public property ActiveCond: Integer READ FActiveCond WRITE set_ActiveCond;
Public property Zmatrix[f,Lngth:Double;Units:Integer]: Tcmatrix READ Get_Zmatrix;
Public property YCmatrix[f,Lngth:Double;Units:Integer]: Tcmatrix READ Get_YCmatrix;
Public property RhoEarth: Double READ Get_RhoEarth WRITE Set_RhoEarth;
Public property Xcoord[i:Integer]: Double READ Get_FX WRITE Set_FX;
Public property Ycoord[i:Integer]: Double READ Get_FY WRITE Set_FY;
Public property Units[i:Integer]: Integer READ Get_FUnits WRITE Set_FUnits;
Public property ConductorName[i:Integer]: String READ Get_ConductorName;
Public property ConductorData[i:Integer]: TConductorDataObj READ Get_ConductorData;
Public property NWires: Integer READ FNConds;
Public property PhaseChoice[i:Integer]: ConductorChoice READ Get_PhaseChoice;

Description

Fields

Public FPhaseChoice: pConductorChoiceArray;
 
Public FNConds: Integer;

TODO: remove – somewhat redundant with FWireData

Public FNPhases: Integer;
 
Public FWireData: pConductorDataArray;
 
Public FX: pDoubleArray;
 
Public FY: pDoubleArray;
 
Public FUnits: pIntegerArray;
 
Public FLastUnit: Integer;
 
Public DataChanged: Boolean;
 
Public FReduce: LongBool;
 
Public FActiveCond: Integer;
 
Public FLineData: TLineConstants;
 
Public NormAmps: Double;
 
Public EmergAmps: Double;
 
Public NumAmpRatings: Integer;
 
Public AmpRatings: array of Double;
 
Public FLineType: Integer;
 
Public LineSpacingObj: TLineSpacingObj;

Pointer to code for type of line

Methods

Public procedure ChangeLineConstantsType(newPhaseChoice: ConductorChoice);
 
Public procedure set_Nconds(const Value: Integer);
 
Public procedure set_Nphases(const Value: Integer);
 
Public procedure set_ActiveCond(const Value: Integer);
 
Public function Get_YCmatrix(f, Lngth: Double; Units: Integer): Tcmatrix;
 
Public function Get_Zmatrix(f, Lngth: Double; Units: Integer): Tcmatrix;
 
Public function Get_RhoEarth: Double;
 
Public procedure Set_RhoEarth(const Value: Double);
 
Public function get_Nconds: Integer;
 
Public procedure UpdateLineGeometryData(f: Double);
 
Public function Get_FX(i: Integer): Double;

call this before using the line data CIM Accessors

Public function Get_FY(i: Integer): Double;
 
Public function Get_FUnits(i: Integer): Integer;
 
Public function Get_ConductorName(i: Integer): String;
 
Public function Get_ConductorData(i: Integer): TConductorDataObj;
 
Public procedure Set_FX(i: Integer; Value: Double);

TODO: remove

Public procedure Set_FY(i: Integer; Value: Double);
 
Public procedure Set_FUnits(i: Integer; Value: Integer);
 
Public function Get_PhaseChoice(i: Integer): ConductorChoice;
 
Public constructor Create(ParClass: TDSSClass; const LineGeometryName: String);
 
Public destructor Destroy; OVERRIDE;
 
Public procedure PropertySideEffects(Idx: Integer; previousIntVal: Integer = 0); override;
 
Public procedure MakeLike(OtherPtr: Pointer); override;
 
Public procedure DumpProperties(F: TFileStream; Complete: Boolean; Leaf: Boolean = False); OVERRIDE;
 
Public procedure SaveWrite(F: TFileStream); OVERRIDE;
 
Public procedure LoadSpacingAndWires(Spc: TLineSpacingObj; Wires: pConductorDataArray);

called from a Line object that has its own Spacing and Wires input automatically sets reduce=y if the spacing has more wires than phases

Properties

Public property Nconds: Integer READ get_Nconds WRITE set_Nconds;
 
Public property Nphases: Integer READ FNphases WRITE set_Nphases;
 
Public property ActiveCond: Integer READ FActiveCond WRITE set_ActiveCond;
 
Public property Zmatrix[f,Lngth:Double;Units:Integer]: Tcmatrix READ Get_Zmatrix;
 
Public property YCmatrix[f,Lngth:Double;Units:Integer]: Tcmatrix READ Get_YCmatrix;
 
Public property RhoEarth: Double READ Get_RhoEarth WRITE Set_RhoEarth;
 
Public property Xcoord[i:Integer]: Double READ Get_FX WRITE Set_FX;

CIM XML accessors

Public property Ycoord[i:Integer]: Double READ Get_FY WRITE Set_FY;
 
Public property Units[i:Integer]: Integer READ Get_FUnits WRITE Set_FUnits;
 
Public property ConductorName[i:Integer]: String READ Get_ConductorName;
 
Public property ConductorData[i:Integer]: TConductorDataObj READ Get_ConductorData;
 
Public property NWires: Integer READ FNConds;
 
Public property PhaseChoice[i:Integer]: ConductorChoice READ Get_PhaseChoice;
 

Generated by PasDoc 0.16.0.