Zvuk u Pascal-u ???

Kako da neki mp3 ili wav ili koji vec fajl namestim da se startuje kad i program?
Znam da mogu odredjeni piskavi tonovi, ali nije to to !!!
Ako mozete napisite primer

Pertpostavljam da ti treba pustanje zvuka u Delphi-u. Za Pascal pod DOS-om bi bio problem, mislim. U svakom slucaju za Delphi ovako:


Na glavnu formu u dogadjaj OnCreate postavis sledeci kod:


PlaySound( PChar( 'neki_zvuk.wav' ), 0, SND_ALIAS + SND_NOSTOP );

U uses moras da stavis "MMSystem".


Ako hoces da stavis da se zvuk cuje kada je glavna forma vec vidljiva onda u OnPaint forme stavi sledeci kod:

...
begin
OnPaint := NIL;
PlaySound( PChar( 'neki_zvuk.wav' ), 0, SND_ALIAS + SND_NOSTOP );
end;