Class TSpectrumObj

Unit

Spectrum

Declaration

type TSpectrumObj = class(TDSSObject)

Description

this is a GUID compliant to RFC 4122, v4

Hierarchy

• TObject
• TNamedObject
• TDSSObject
• TSpectrumObj

Overview

Fields

	NumHarm: Integer;
	HarmArray: pDoubleArray;

Methods

	constructor Create(ParClass: TDSSClass; const SpectrumName: String);
	destructor Destroy; OVERRIDE;
	procedure MakeLike(OtherPtr: Pointer); override;
	procedure PropertySideEffects(Idx: Integer; previousIntVal: Integer = 0); override;
	function GetMult(const h: Double): Complex;
	procedure DumpProperties(F: TFileStream; Complete: Boolean; Leaf: Boolean = False); OVERRIDE;

Description

Fields

	NumHarm: Integer;

	HarmArray: pDoubleArray;
Public so solution can get to it.

Methods

	constructor Create(ParClass: TDSSClass; const SpectrumName: String);

	destructor Destroy; OVERRIDE;

	procedure MakeLike(OtherPtr: Pointer); override;

	procedure PropertySideEffects(Idx: Integer; previousIntVal: Integer = 0); override;

	function GetMult(const h: Double): Complex;

	procedure DumpProperties(F: TFileStream; Complete: Boolean; Leaf: Boolean = False); OVERRIDE;