Sources
Delphi Russian Knowledge Base
DRKB - это самая большая и удобная в использовании база знаний по Дельфи в рунете, составленная Виталием Невзоровым

Как играть MIDI без медиаплеера?

01.01.2007
uses 
  MMSystem; 
 
// Play Midi 
procedure TForm1.Button1Click; 
const 
  FileName = 'C:\YourFile.mid'; 
begin 
  MCISendString(PChar('play ' + FileName), nil, 0, 0); 
end; 
 
// Stop Midi 
procedure TForm1.Button1Click; 
const 
  FileName = 'C:\YourFile.mid'; 
begin 
  MCISendString(PChar('stop ' + FileName), nil, 0, 0); 
end; 

Взято с сайта https://www.swissdelphicenter.ch/en/tipsindex.php