Class TSFEnum

Unit

X3DFields

Declaration

type TSFEnum = class(TX3DSingleField)

Description

Warning: this symbol is deprecated.

VRML 1.0 (deprecated) field representing an enumerated value, which means that you choose one (named) value from a set of possible values. This is deprecated, as VRML 1.0 is an ancient format now.

Hierarchy

• TObject
• TPersistent
• TX3DFileItem
• TX3DFieldOrEvent
• TX3DField
• TX3DSingleField
• TSFEnum

Overview

Fields

	Value: integer;
	DefaultValue: integer;
	DefaultValueExists: boolean;

Methods

	constructor Create(const AParentNode: TX3DFileItem; const AExposed: boolean; const AName: string; const AEnumNames: PConstantStringArray; const AEnumNamesCount: Cardinal; const AValue: integer);
	procedure ParseValue(Lexer: TX3DLexer; Reader: TX3DReader); override;
	function EqualsDefaultValue: boolean; override;
	function Equals(SecondValue: TX3DField): boolean; override;
	procedure Assign(Source: TPersistent); override;
	procedure AssignValue(Source: TX3DField); override;
	procedure AssignDefaultValueFromValue; override;
	procedure UnassignDefaultValue; override;
	class function X3DType: string; override;
	procedure Send(const AValue: LongInt); overload;

Properties

	property EnumNames[i:integer]: string read GetEnumNames;
	property EnumNamesCount: Cardinal read FEnumNamesCount;

Description

Fields

	Value: integer;
Value between 0 .. EnumNamesCount - 1. By default 0.

	DefaultValue: integer;

	DefaultValueExists: boolean;

Methods

	constructor Create(const AParentNode: TX3DFileItem; const AExposed: boolean; const AName: string; const AEnumNames: PConstantStringArray; const AEnumNamesCount: Cardinal; const AValue: integer);

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

	function EqualsDefaultValue: boolean; override;

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

	procedure Assign(Source: TPersistent); override;

	procedure AssignValue(Source: TX3DField); override;

	procedure AssignDefaultValueFromValue; override;

	procedure UnassignDefaultValue; override;

	class function X3DType: string; override;

	procedure Send(const AValue: LongInt); overload;

Properties

	property EnumNames[i:integer]: string read GetEnumNames;
Names of the enumerated values. Note that this cannot be initialized by CreateUndefined, so you always must initialize this field using the Create overload that takes AEnumNames parameter.

	property EnumNamesCount: Cardinal read FEnumNamesCount;

---

Generated by PasDoc 0.16.0.