이정한 wrote:

> Wav File 재생이 끝나면 바로 알수 있는방법이 있는지요?

> 복잡하면 대략이라도 부탁드립니다





안녕하십니까?



델세상 (http://www.freechal.com/delphiworld) 의 조규춘입니다.



우선 아래의 소스를 보시면 다음과 같은 형식을 볼수 있을겁니다.



procedure TForm1.Button1Click(Sender: TObject);

begin

caption := '음악연주 시작이여용';

PlaySound(Pchar('c:chosensealram.WAV'),0,SND_SYNC);

caption := '음악연주 끝이여용';

end;





이중에...

PlaySound() 를 보시면...



PlaySound(LPCSTR pszSound, HMODULE hmod,DWORD fdwSound );



이런 형식이라구 도움말에는 나타납니다.



그중에서 제일 마지막 인자로 쓴 SND_SYNC의 의미를 아시면 해결될겁니다.





우선 세번째 인자루 쓰여지는 것들에 대해서 잠시 서술을 .... ^^



SND_SYNC 사운드 연주를 동기화하며 연주가 끝나기 전에는 함수를 끝내지 않는다. 즉 사운드가 연주되는 동안 잠시 멈추어 있는다.



SND_ASYNC 사운드 연주를 비동기화하며 연주가 시작되자마자 함수를 끝내므로 사운드 연주후 곧바로 다른 일을 할수 있다. 물론 사운드는 계속연주된다.



대강 이런거지요...



물론 다른 값들도 있기는 하지만요.. 푸히히..^^





물론 저 PlaySound를 사용하실려면 MMSystem 을 유닛에 추가해야 하는건 아시겠지용~



^^ 행복하셔용~