Class TSFEnum

Unit

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

Overview

Fields

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

Methods

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

Properties

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

Description

Fields

Public Value: integer;

Value between 0 .. EnumNamesCount - 1. By default 0.

Public DefaultValue: integer;
 
Public DefaultValueExists: boolean;
 

Methods

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

Properties

Public 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.

Public property EnumNamesCount: Cardinal read FEnumNamesCount;
 

Generated by PasDoc 0.16.0.