Class TDownhillSimplexMinimizer

Unit

downhill_simplex_minimizer

Declaration

type TDownhillSimplexMinimizer = class(TMinimizer, IOptimizedFunction, IDownhillRealParameters, IUpdatingResults)

Description

Implements application interfaces required by downhill simplex algorithm.

Hierarchy

• TComponent
• TMinimizer
• TDownhillSimplexMinimizer

Overview

Fields

Server: TDownhillSimplexServer;

Methods

	constructor Create(AOwner: TComponent); override;
	destructor Destroy; override;
	function GetNumberOfValues: longint;
	function GetOptimizedFunction: double;
	function GetParameter(index: longint): TVariableParameter;
	function GetParametersNumber: longint;
	function GetValueIndex: longint;
	function GetVariationStep(index: LongInt): double;
	procedure CreateParameters;
	procedure Minimize(var ErrorCode: longint); override;
	procedure ParametersUpdated;
	procedure ResetCurJobProgress(Sender: TComponent);
	procedure SetParameter(index: longint; AParameter: TVariableParameter);
	procedure SetValueIndex(const AValueIndex: longint);
	procedure SetVariationStep(index: LongInt; Value: double);
	procedure ShowCurJobProgress(Sender: TComponent; MinValue, MaxValue, CurValue: longint);
	procedure ShowMessage(Sender: TComponent; Msg: string);
	procedure UpdateResults(Sender: TComponent);
	procedure SetTerminated(ATerminated: boolean); override;
	procedure SelectParameter(index: longint);

Description

Fields

	Server: TDownhillSimplexServer;

Methods

	constructor Create(AOwner: TComponent); override;

	destructor Destroy; override;

	function GetNumberOfValues: longint;
IDiscretValue

	function GetOptimizedFunction: double;
IOptimizedFunction

	function GetParameter(index: longint): TVariableParameter;

	function GetParametersNumber: longint;
IDownhillSimplexParameters

	function GetValueIndex: longint;

	function GetVariationStep(index: LongInt): double;

	procedure CreateParameters;
IDownhillRealParameters

	procedure Minimize(var ErrorCode: longint); override;

	procedure ParametersUpdated;

	procedure ResetCurJobProgress(Sender: TComponent);

	procedure SetParameter(index: longint; AParameter: TVariableParameter);

	procedure SetValueIndex(const AValueIndex: longint);

	procedure SetVariationStep(index: LongInt; Value: double);

	procedure ShowCurJobProgress(Sender: TComponent; MinValue, MaxValue, CurValue: longint);
IUpdatingResults

	procedure ShowMessage(Sender: TComponent; Msg: string);

	procedure UpdateResults(Sender: TComponent);

	procedure SetTerminated(ATerminated: boolean); override;

	procedure SelectParameter(index: longint);