Do odtwarzania d¼wiêków w Delphi korzysta siê z modu³u MMSystem (dodaj go do list uses ). D¼wiêki odtwarza siê za pomoc±: PlaySound(pszSound:PAnsiChar,hmod:Cardinal,fdwSound: Cardinal); Pierwszy parametr to ¶cie¿ka do pliku który ma byæ odtworzony, drugi domy¶lnie powinien wynosiæ 0, ostatni to tzw. flagi. Mo¿liwe s± warto¶ci: snd_Alias - odgrywanie z rejestru 1 - odtwarzanie równoczescne z dzia³aniem programu snd_FileName - odgrywanie z dysku snd_Loop - zapêtlenie odtwarzania snd_Purge - koñczy odtwarzane d¼wiêki Przyk³ad odtworzy d¼wiêk startu systemu: PlaySound('SystemStart', 0, SND_ALIAS + 1 + SND_NODEFAULT); Mo¿e siê zdarzyæ ¿e w systemie nie jest przypisany ¿aden d¼wiêk który jest odtwarzany przy starcie systemu, dlatego dodaje siê SND_NODEFAULT . Zamiast SystemStart mo¿na daæ inne warto¶ci np. SystemExit (wiêcej nazw znajdziesz w rejestrze w HKEY_CURRENT_USER -> AppEvents -> EventLabels ). By zakoñczyæ odtwarzanie d¼wiêków nale¿y wykorzystaæ: PlaySound(nil, 0, SND_PURGE); Korzystanie z tej metody do odtwarzania d¼wiêków jest dobre, ale do odtwarzania muzyki (i do robienia odtwarzacza) lepiej skorzystaæ z komponentu MediaPlayer.
|