Class TRepoSoundEngine

Description
Hierarchy
Nested Classes and Records
Nested Types
Fields
Methods
Properties

Unit

ok_nested_1

Declaration

type TRepoSoundEngine = class(TSoundEngine)

Description

This item has no description.

Hierarchy

Overview

Nested Classes and Records

Private TSoundInfo = class(TObject)
Private TSoundInfoList = class(TObjectList<TSoundInfo>)
Private TSoundInfoAlias = class(TSoundInfo)
Private TSoundInfoBuffer = class(TSoundInfo)
Private TSoundGroup = class(TSoundInfoList)
Private TSoundGroupList = class(TObjectList<TSoundGroup>)

Nested Types

Private TLoopingChannelList = TObjectList<TLoopingChannel>;

Fields

Private var FSoundImportanceNames: TStringList;
Private FSounds: TSoundInfoList;
Private FSoundGroups: TSoundGroupList;
Private FRepositoryUrl: String;
Private FLoopingChannels: TLoopingChannelList;

Methods

Private procedure SetRepositoryUrl(const Value: String);
Private procedure RestartLoopingChannels;
Private function GetLoopingChannel(const Index: Cardinal): TLoopingChannel;
Private procedure ContextOpenCore; override;
Private procedure AddSoundImportanceName(const Name: string; Importance: Integer);
Public constructor Create;
Public destructor Destroy; override;

Properties

Private property SoundImportanceNames: TStringList read FSoundImportanceNames;

Description

Nested Types

Private TLoopingChannelList = TObjectList<TLoopingChannel>;

This item has no description.

Fields

Private var FSoundImportanceNames: TStringList;

This item has no description.

Private FSounds: TSoundInfoList;

A list of sounds used by your program. Each sound has a unique name, used to identify sound in the XML file and for SoundFromName function.

At the beginning, this list always contains exactly one sound, empty. This is a special TSoundInfoBuffer that has Sound=nil and Name=''. It means "no sound" in many cases.

Private FSoundGroups: TSoundGroupList;

This item has no description.

Private FRepositoryUrl: String;

This item has no description.

Private FLoopingChannels: TLoopingChannelList;

This item has no description.

Methods

Private procedure SetRepositoryUrl(const Value: String);

This item has no description.

Private procedure RestartLoopingChannels;

This item has no description.

Private function GetLoopingChannel(const Index: Cardinal): TLoopingChannel;

This item has no description.

Private procedure ContextOpenCore; override;

This item has no description.

Private procedure AddSoundImportanceName(const Name: string; Importance: Integer);

This item has no description.

Public constructor Create;

This item has no description.

Public destructor Destroy; override;

This item has no description.

Properties

Private property SoundImportanceNames: TStringList read FSoundImportanceNames;

This item has no description.