Class TSpecialCurveParameter

Unit

special_curve_parameter

Declaration

type TSpecialCurveParameter = class(TObject)

Description

Represents parameter of curve point set. It could be variable or not, depending on selected type.

Hierarchy

• TObject
• TSpecialCurveParameter

Overview

Fields

	FName: string;
	FSavedValue: double;
	FType: TParameterType;
	FValue: double;
	FVariationDisabled: boolean;
	FVariationStep: double;

Methods

	constructor Create;
	function CreateCopy: TSpecialCurveParameter; virtual; abstract;
	function MinimumStepAchieved: boolean; virtual; abstract;
	function GetValue: double; virtual;
	procedure CopyTo(const Dest: TSpecialCurveParameter); virtual;
	procedure InitValue; virtual; abstract;
	procedure InitVariationStep; virtual; abstract;
	procedure MultiplyVariationStep(Factor: double);
	procedure SetValue(AValue: double); virtual;
	procedure WriteValueToLog(AValue: double);

Properties

	property Name: string read FName write FName;
	property SavedValue: double read FSavedValue write FSavedValue;
	property Type_: TParameterType read FType write FType;
	property Value: double read GetValue write SetValue;
	property VariationDisabled: boolean read FVariationDisabled write FVariationDisabled;
	property VariationStep: double read FVariationStep write FVariationStep;

Description

Fields

	FName: string;

	FSavedValue: double;

	FType: TParameterType;

	FValue: double;

	FVariationDisabled: boolean;

	FVariationStep: double;

Methods

	constructor Create;

	function CreateCopy: TSpecialCurveParameter; virtual; abstract;
Must be abstract because only instances of descendant classes could be created. https://github.com/dvmorozov/fit/issues/143

	function MinimumStepAchieved: boolean; virtual; abstract;

	function GetValue: double; virtual;
These methods are overriden in descendant classes to provide some special computation on parameter values.

	procedure CopyTo(const Dest: TSpecialCurveParameter); virtual;

	procedure InitValue; virtual; abstract;

	procedure InitVariationStep; virtual; abstract;

	procedure MultiplyVariationStep(Factor: double);

	procedure SetValue(AValue: double); virtual;

	procedure WriteValueToLog(AValue: double);

Properties

	property Name: string read FName write FName;

	property SavedValue: double read FSavedValue write FSavedValue;

	property Type_: TParameterType read FType write FType;

	property Value: double read GetValue write SetValue;

	property VariationDisabled: boolean read FVariationDisabled write FVariationDisabled;

	property VariationStep: double read FVariationStep write FVariationStep;