MidiMountain 0.4.0

Class TMCList

Unit

Declaration

type TMCList = class

Description

Methods

Overview

	constructor Create( aItemClass: TItemClass );
	destructor Destroy; Override;
	function Add( aOwner: TMCBase ): TMCItem;
	function AddOrdered( aOwner: TMCBase; aOffset: TMidiOffset ):TMCItem;
	procedure Changed( aNewOffset: TMidiOffset; aMidiItem: TMCItem );
	procedure Clear;
	function GetBeforeOffset( aOffset: TMidiOffset ):TMCItem;
	function GetMaxOffset: TMidiOffset;
	procedure Grab( aList: TMCList );
	function HasItemAtZero: boolean;
	procedure InsertOrdered( aOffset: TMidiOffset; aMCItem: TMCItem );
	procedure RebuildIndex;
	procedure Remove( aMCItem: TMCItem );
	procedure Sort;

Description

constructor Create( aItemClass: TItemClass );

create a list with a certain item class

destructor Destroy; Override;

whack the class and all its items

function Add( aOwner: TMCBase ): TMCItem;

add a new MIDI class item

function AddOrdered( aOwner: TMCBase; aOffset: TMidiOffset ):TMCItem;

add a new MIDI class item in order of offsets

procedure Changed( aNewOffset: TMidiOffset; aMidiItem: TMCItem );

notify the list that the item has changed

procedure Clear;

clear the list;

function GetBeforeOffset( aOffset: TMidiOffset ):TMCItem;

get the item right before a given offset

function GetMaxOffset: TMidiOffset;

get highest offset MIDI information is on

procedure Grab( aList: TMCList );

grap all the entries of a given list and create links to them

function HasItemAtZero: boolean;

check if the list has an item at the position 0

procedure InsertOrdered( aOffset: TMidiOffset; aMCItem: TMCItem );

insert an existing item in the correct position

procedure RebuildIndex;

rebuild the index to access by index

procedure Remove( aMCItem: TMCItem );

remove MIDI class item even if added multiple times

procedure Sort;

sort the items by offset

Properties

Overview

	property Clearing: boolean;
	property Count: longint;
	property Items[ Index: integer ]: TMCItem;
	property KeepOrdered: boolean;

Description

property Clearing: boolean;

flag showing that all items are getting removed

property Count: longint;

the count of the list

property Items[ Index: integer ]: TMCItem;

list of TMCItems

property KeepOrdered: boolean;

keep the list ordered when offsets of items change