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
- TObject
- TNamedObject
- TDSSObject
- TLineGeometryObj
Overview
Fields
FPhaseChoice: pConductorChoiceArray; |
|
FNConds: Integer; |
|
FNPhases: Integer; |
|
FWireData: pConductorDataArray; |
|
FX: pDoubleArray; |
|
FY: pDoubleArray; |
|
FUnits: pIntegerArray; |
|
FLastUnit: Integer; |
|
DataChanged: Boolean; |
|
FReduce: LongBool; |
|
FActiveCond: Integer; |
|
FLineData: TLineConstants; |
|
NormAmps: Double; |
|
EmergAmps: Double; |
|
NumAmpRatings: Integer; |
|
AmpRatings: array of Double; |
|
FLineType: Integer; |
|
LineSpacingObj: TLineSpacingObj; |
Methods
procedure ChangeLineConstantsType(newPhaseChoice: ConductorChoice); |
|
procedure set_Nconds(const Value: Integer); |
|
procedure set_Nphases(const Value: Integer); |
|
procedure set_ActiveCond(const Value: Integer); |
|
function Get_YCmatrix(f, Lngth: Double; Units: Integer): Tcmatrix; |
|
function Get_Zmatrix(f, Lngth: Double; Units: Integer): Tcmatrix; |
|
function Get_RhoEarth: Double; |
|
procedure Set_RhoEarth(const Value: Double); |
|
function get_Nconds: Integer; |
|
procedure UpdateLineGeometryData(f: Double); |
|
function Get_FX(i: Integer): Double; |
|
function Get_FY(i: Integer): Double; |
|
function Get_FUnits(i: Integer): Integer; |
|
function Get_ConductorName(i: Integer): String; |
|
function Get_ConductorData(i: Integer): TConductorDataObj; |
|
procedure Set_FX(i: Integer; Value: Double); |
|
procedure Set_FY(i: Integer; Value: Double); |
|
procedure Set_FUnits(i: Integer; Value: Integer); |
|
function Get_PhaseChoice(i: Integer): ConductorChoice; |
|
constructor Create(ParClass: TDSSClass; const LineGeometryName: String); |
|
destructor Destroy; OVERRIDE; |
|
procedure PropertySideEffects(Idx: Integer; previousIntVal: Integer = 0); override; |
|
procedure MakeLike(OtherPtr: Pointer); override; |
|
procedure DumpProperties(F: TFileStream; Complete: Boolean; Leaf: Boolean = False); OVERRIDE; |
|
procedure SaveWrite(F: TFileStream); OVERRIDE; |
|
procedure LoadSpacingAndWires(Spc: TLineSpacingObj; Wires: pConductorDataArray); |
Properties
property Nconds: Integer READ get_Nconds WRITE set_Nconds; |
|
property Nphases: Integer READ FNphases WRITE set_Nphases; |
|
property ActiveCond: Integer READ FActiveCond WRITE set_ActiveCond; |
|
property Zmatrix[f,Lngth:Double;Units:Integer]: Tcmatrix READ Get_Zmatrix; |
|
property YCmatrix[f,Lngth:Double;Units:Integer]: Tcmatrix READ Get_YCmatrix; |
|
property RhoEarth: Double READ Get_RhoEarth WRITE Set_RhoEarth; |
|
property Xcoord[i:Integer]: Double READ Get_FX WRITE Set_FX; |
|
property Ycoord[i:Integer]: Double READ Get_FY WRITE Set_FY; |
|
property Units[i:Integer]: Integer READ Get_FUnits WRITE Set_FUnits; |
|
property ConductorName[i:Integer]: String READ Get_ConductorName; |
|
property ConductorData[i:Integer]: TConductorDataObj READ Get_ConductorData; |
|
property NWires: Integer READ FNConds; |
|
property PhaseChoice[i:Integer]: ConductorChoice READ Get_PhaseChoice; |
Description
Fields
FPhaseChoice: pConductorChoiceArray; |
|
FNConds: Integer; |
|
TODO: remove – somewhat redundant with FWireData |
FNPhases: Integer; |
|
FWireData: pConductorDataArray; |
|
FX: pDoubleArray; |
|
FY: pDoubleArray; |
|
FUnits: pIntegerArray; |
|
FLastUnit: Integer; |
|
DataChanged: Boolean; |
|
FReduce: LongBool; |
|
FActiveCond: Integer; |
|
FLineData: TLineConstants; |
|
NormAmps: Double; |
|
EmergAmps: Double; |
|
NumAmpRatings: Integer; |
|
AmpRatings: array of Double; |
|
FLineType: Integer; |
|
LineSpacingObj: TLineSpacingObj; |
|
Pointer to code for type of line |
Methods
procedure ChangeLineConstantsType(newPhaseChoice: ConductorChoice); |
|
procedure set_Nconds(const Value: Integer); |
|
procedure set_Nphases(const Value: Integer); |
|
procedure set_ActiveCond(const Value: Integer); |
|
function Get_YCmatrix(f, Lngth: Double; Units: Integer): Tcmatrix; |
|
function Get_Zmatrix(f, Lngth: Double; Units: Integer): Tcmatrix; |
|
function Get_RhoEarth: Double; |
|
procedure Set_RhoEarth(const Value: Double); |
|
function get_Nconds: Integer; |
|
procedure UpdateLineGeometryData(f: Double); |
|
function Get_FX(i: Integer): Double; |
|
call this before using the line data CIM Accessors |
function Get_FY(i: Integer): Double; |
|
function Get_FUnits(i: Integer): Integer; |
|
function Get_ConductorName(i: Integer): String; |
|
function Get_ConductorData(i: Integer): TConductorDataObj; |
|
procedure Set_FX(i: Integer; Value: Double); |
|
TODO: remove |
procedure Set_FY(i: Integer; Value: Double); |
|
procedure Set_FUnits(i: Integer; Value: Integer); |
|
function Get_PhaseChoice(i: Integer): ConductorChoice; |
|
constructor Create(ParClass: TDSSClass; const LineGeometryName: String); |
|
destructor Destroy; OVERRIDE; |
|
procedure PropertySideEffects(Idx: Integer; previousIntVal: Integer = 0); override; |
|
procedure MakeLike(OtherPtr: Pointer); override; |
|
procedure DumpProperties(F: TFileStream; Complete: Boolean; Leaf: Boolean = False); OVERRIDE; |
|
procedure SaveWrite(F: TFileStream); OVERRIDE; |
|
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
property Nconds: Integer READ get_Nconds WRITE set_Nconds; |
|
property Nphases: Integer READ FNphases WRITE set_Nphases; |
|
property ActiveCond: Integer READ FActiveCond WRITE set_ActiveCond; |
|
property Zmatrix[f,Lngth:Double;Units:Integer]: Tcmatrix READ Get_Zmatrix; |
|
property YCmatrix[f,Lngth:Double;Units:Integer]: Tcmatrix READ Get_YCmatrix; |
|
property RhoEarth: Double READ Get_RhoEarth WRITE Set_RhoEarth; |
|
property Xcoord[i:Integer]: Double READ Get_FX WRITE Set_FX; |
|
CIM XML accessors |
property Ycoord[i:Integer]: Double READ Get_FY WRITE Set_FY; |
|
property Units[i:Integer]: Integer READ Get_FUnits WRITE Set_FUnits; |
|
property ConductorName[i:Integer]: String READ Get_ConductorName; |
|
property ConductorData[i:Integer]: TConductorDataObj READ Get_ConductorData; |
|
property NWires: Integer READ FNConds; |
|
property PhaseChoice[i:Integer]: ConductorChoice READ Get_PhaseChoice; |
|
Generated by PasDoc 0.16.0.