请给点我希望！有关音乐流程序“音乐播放头文件”的制作？Delphi (50分)

有关音乐流程序“音乐头文件”的制作？<br>问题一：我想知道怎样把WAV、MID、MP3等音乐文件用“流”添加和生成EXE文件就是怎么样把有关的音乐文件有选择的添加给“头文件”！<br>谁能把如下代码改为WAV、MID、MP3音乐流Load<br>Function Cjt_JpgLoad(JpgImg:Timage;SourceFile:String):Boolean;<br>var<br>Source:TFileStream;<br>MyFileSize:integer;<br>Myjpg: TJpegImage;<br>begin<br>try<br>Myjpg:= TJpegImage.Create;<br>Source:=TFileStream.Create(SourceFile,fmOpenRead or fmShareDenyNone);<br>try<br>Source.Seek(-sizeof(MyFileSize),soFromEnd);<br>Source.ReadBuffer(MyFileSize,sizeof(MyFileSize));<br>Source.Seek(-MyFileSize,soFromEnd);<br>Myjpg.LoadFromStream(Source);<br>JpgImg.Picture.Bitmap.Assign(Myjpg);<br>finally<br>Source.Free;<br>Myjpg.free;<br>end;<br>except<br>Result:=false;<br>Exit;<br>end;<br>Result:=true;<br>end;<br>问题二：怎么样做成循环播放音乐头文件？<br>问题三：怎么样用“流”更改要生成EXE文件的头文件窗体大小或者里面的控件大小显示和字符串的传递？