Booo, с музыкой все очень просто. А "PlayMelody(AMelodyFileName : String)" это невстроенная процедура, а самописанная которая должна быть примерно такая:
Цитата:
PlayMelody(MelodyFileName:string ;
begin
//сперва можно было конечно проверить играет ли плеер, но я это опустил
Form1.mediaplayer1.stop;
Form1.mediaplayer1.filename:=MelodyFileName;
Form1.mediaplayer1.play;
end;
|
И теперь при событии OnCreate вызываешь процедуру PlayMelody(filename), где переменная filename содержит полный путь к песенке для данной формы. Вот и все