Class TNeutronPointsSet

Unit

neutron_points_set

Declaration

type TNeutronPointsSet = class(TPointsSet)

Description

Implements point set of experimental neutronogram. It's assumed that point coordinates are expressed in 2 * Theta.

Hierarchy

• TComponent
• TSelfCopiedComponent
• TPointsSet
• TNeutronPointsSet

Overview

Fields

FWaveLength: double;

Methods

	constructor Create(AOwner: TComponent); override;
	constructor CreateFromPoints(AOwner: TComponent; const Points: TPointsSet);
	function GetPoint2T(index: longint): double;
	function GetPointIntensity(index: longint): double;
	function GetPointSinTL(index: longint): double;
	function GetPointT(index: longint): double;
	procedure CopyParameters(Dest: TObject); override;
	procedure CopyPointsFrom(const Points: TPointsSet);
	procedure SetPointIntensity(index: longint; Value: double);

Properties

	property Point2T[index:longint]: double read GetPoint2T;
	property PointIntensity[index:longint]: double read GetPointIntensity write SetPointIntensity;
	property PointSinTL[index:longint]: double read GetPointSinTL;
	property PointT[index:longint]: double read GetPointT;
	property WaveLength: double read FWaveLength write FWaveLength;

Description

Fields

	FWaveLength: double;

Methods

	constructor Create(AOwner: TComponent); override;

	constructor CreateFromPoints(AOwner: TComponent; const Points: TPointsSet);

	function GetPoint2T(index: longint): double;

	function GetPointIntensity(index: longint): double;

	function GetPointSinTL(index: longint): double;

	function GetPointT(index: longint): double;

	procedure CopyParameters(Dest: TObject); override;

	procedure CopyPointsFrom(const Points: TPointsSet);

	procedure SetPointIntensity(index: longint; Value: double);

Properties

	property Point2T[index:longint]: double read GetPoint2T;

	property PointIntensity[index:longint]: double read GetPointIntensity write SetPointIntensity;

	property PointSinTL[index:longint]: double read GetPointSinTL;

	property PointT[index:longint]: double read GetPointT;

	property WaveLength: double read FWaveLength write FWaveLength;