Class tmidisource

Unit

msemidi

Declaration

type tmidisource = class(tmsecomponent)

Description

Hierarchy

• TObject
• TPersistent
• tcomponent
• tmsecomponent
• tmidisource

Overview

Fields

	fstate: midisourcestatesty;
	ftrackevent: trackeventinfoty;

Methods

	function ticksperbeat: integer;
	procedure error(const aerror: midierrorty);
	procedure clear;
	procedure initstream;
	procedure mergeevents;
	procedure checkdata;
	procedure start;
	procedure stop;
	function checkresult(const aresult: boolean; const aerror: midierrorty): boolean;
	procedure processevent;
	procedure dotrackevent; virtual;
	procedure dotimer(const sender: tobject);
	constructor create(aowner: tcomponent); override;
	destructor destroy; override;
	procedure loadtracks;

Properties

	property active: boolean read factive write setactive;
	property stream: tmidistream read fstream write setstream;
	property tracks: trackinfoarty read ftracks;
	property tempo: real read ftempo write settempo;
	property ontrackevent: trackeventty read fontrackevent write fontrackevent;

Description

Fields

	fstate: midisourcestatesty;

	ftrackevent: trackeventinfoty;

Methods

	function ticksperbeat: integer;

	procedure error(const aerror: midierrorty);

	procedure clear;

	procedure initstream;

	procedure mergeevents;

	procedure checkdata;

	procedure start;

	procedure stop;

	function checkresult(const aresult: boolean; const aerror: midierrorty): boolean;

	procedure processevent;

	procedure dotrackevent; virtual;

	procedure dotimer(const sender: tobject);

	constructor create(aowner: tcomponent); override;

	destructor destroy; override;

	procedure loadtracks;

Properties

	property active: boolean read factive write setactive;

	property stream: tmidistream read fstream write setstream;

	property tracks: trackinfoarty read ftracks;

	property tempo: real read ftempo write settempo;

	property ontrackevent: trackeventty read fontrackevent write fontrackevent;