Class TSFMatrix3d

Unit

X3DFields

Declaration

type TSFMatrix3d = class(TX3DSingleField)

Description

Base class for all VRML/X3D fields.

Common notes for all descendants: most of them expose field or property "Value", this is (surprise, surprise!) the value of the field. Many of them also expose DefaultValue and DefaultValueExists fields/properties, these should be the default VRML value for this field. You can even change DefaultValue after the object is created.

Most of descendants include constructor that initializes both DefaultValue and Value to the same thing, as this is what you usually want.

Some notes about Assign method (inherited from TPersistent and overridied appropriately in TX3DField descendants):

1. There are some exceptions, but usually assignment is possible only when source and destination field classes are equal.

2. Assignment (by Assign, inherited from TPersistent) tries to copy everything: name (with alternative names), default value, IsClauseNames, ValueFromIsClause, Exposed, and of course current value.

   Exceptions are things related to hierarchy of containers: ParentNode, ParentInterfaceDeclaration. Also ExposedEventsLinked.

   If you want to copy only the current value, use AssignValue (or AssignLerp, where available).

Hierarchy

• TPersistent
• TNonRefCountedInterfacedPersistent
• TX3DFileItem
• TX3DFieldOrEvent
• TX3DField
• TX3DSingleField
• TSFMatrix3d

Overview

Methods

	procedure SaveToStreamValue(Writer: TX3DWriter); override;
	constructor Create(AParentNode: TX3DFileItem; const AName: string; const AValue: TMatrix3Double);
	procedure ParseValue(Lexer: TX3DLexer; Reader: TX3DReader); override;
	function EqualsDefaultValue: boolean; override;
	function Equals(SecondValue: TX3DField; const EqualityEpsilon: Double): boolean; override;
	function FastEqualsValue(SecondValue: TX3DField): boolean; override;
	procedure AssignLerp(const A: Double; Value1, Value2: TX3DField); override;
	function CanAssignLerp: boolean; override;
	procedure Assign(Source: TPersistent); override;
	procedure AssignValue(Source: TX3DField); override;
	procedure AssignDefaultValueFromValue; override;
	class function TypeName: string; override;
	class function CreateEvent(const AParentNode: TX3DFileItem; const AName: string; const AInEvent: boolean): TX3DEvent; override;
	procedure Send(const AValue: TMatrix3Double); overload;

Properties

property Value: TMatrix3Double read FValue write FValue;

Description

Methods

	procedure SaveToStreamValue(Writer: TX3DWriter); override;

	constructor Create(AParentNode: TX3DFileItem; const AName: string; const AValue: TMatrix3Double);

	procedure ParseValue(Lexer: TX3DLexer; Reader: TX3DReader); override;

	function EqualsDefaultValue: boolean; override;

	function Equals(SecondValue: TX3DField; const EqualityEpsilon: Double): boolean; override;

	function FastEqualsValue(SecondValue: TX3DField): boolean; override;

	procedure AssignLerp(const A: Double; Value1, Value2: TX3DField); override;

	function CanAssignLerp: boolean; override;

	procedure Assign(Source: TPersistent); override;

	procedure AssignValue(Source: TX3DField); override;

	procedure AssignDefaultValueFromValue; override;

	class function TypeName: string; override;

	class function CreateEvent(const AParentNode: TX3DFileItem; const AName: string; const AInEvent: boolean): TX3DEvent; override;

	procedure Send(const AValue: TMatrix3Double); overload;

Properties

	property Value: TMatrix3Double read FValue write FValue;