Class TCustomParser

Unit

type TCustomParser = class(TComponent)

	Name	Description
	`FunctionOne`
	`FunctionTwo`

	`constructor Create(AOwner: TComponent); override;`
	`destructor Destroy; override;`
	`procedure AddFunctionOneParam(const AFunctionName: string; const Func: TMathProcedure);`
	`procedure AddFunctionTwoParam(const AFunctionName: string; const Func: TMathProcedure);`
	`procedure ClearFunction(const AFunctionName: string);`
	`procedure ClearFunctions;`
	`procedure ClearVariable(const AVarName: string);`
	`procedure ClearVariables;`
	`procedure FreeExpression;`
	`function GetVariable(const VarName: string): extended;`
	`function ParseExpression(const AnExpression: string): boolean;`
	`function SetVariable(VarName: string; const Value: extended): PParserFloat;`
	`function VariableExists(const AVarName: string): boolean;`

procedure AddFunctionOneParam(const AFunctionName: string; const Func: TMathProcedure);

procedure AddFunctionTwoParam(const AFunctionName: string; const Func: TMathProcedure);

function SetVariable(VarName: string; const Value: extended): PParserFloat;

	`property A: ParserFloat;`
	`property B: ParserFloat;`
	`property C: ParserFloat;`
	`property D: ParserFloat;`
	`property E: ParserFloat;`
	`property Expression: string;`
	`property LinkedOperationList: POperation;`
	`property OnParserError: TParserExceptionEvent;`
	`property ParserError: boolean;`
	`property PascalNumberformat: boolean;`
	`property T: ParserFloat;`
	`property Value: extended;`
	`property Variable[const VarName: string]: extended;`
	`property X: ParserFloat;`
	`property Y: ParserFloat;`