Class TMidi (unit Umidi)

Inherits from

TCompressStream

Constructors



Functions

function Close:longint;

dword

destructor destroy;

Tmidi

function ErrStr(i:integer):String;

dword

function Open:longint;

Public declarations

create the file


function Play(fff,ttt:Longint):longint;

dword

procedure SetResName(const ResName:String);


Properties

property AutoRepeat : boolean


property MidiFile : string


property MidiRes : string


Events

Variables

DeviceId : integer;

Private declarations

FAutoRepeat : boolean;


FResName : string;


FTempFile : string;



Constructors


Functions


function Close:longint;

dword


destructor destroy;

Tmidi


function ErrStr(i:integer):String;

dword


function Open:longint;

Public declarations

create the file


function Play(fff,ttt:Longint):longint;

dword


procedure SetResName(const ResName:String);


Properties


property AutoRepeat : boolean


property MidiFile : string


property MidiRes : string


Events


Variables


DeviceId : integer;

Private declarations


FAutoRepeat : boolean;


FResName : string;


FTempFile : string;