急，如何制作钢琴程序(20分)

用下面的语句可以实现哆来米。。。的发声。
procedure TForm1.Button1Click(Sender: TObject);
begin

//1 2 3 4 5 6 7
windows.beep(262,500);
windows.beep(294,500);
windows.beep(330,500);
windows.beep(349 ,500);
windows.beep(392,500);
windows.beep(440 ,500);
windows.beep(494,500);
end;




但是声音来自主板上的那个小喇叭的发出的。
我想知道用什么语句可以实现可以让这些音符从多媒体的音箱里发出。

这样我就可以把歌词普子输入电脑，模拟钢琴的声音。
如果不能单纯用语句实现，是不是通过数材实现。