안녕하세요. 최용일입니다.
완전한 목록을 주시지 않았네요. 그리고 리소스타입에 WAVE라는 것은 없는데...
Wave같은 것은 RCDATA타입으로 읽은데... IDR_STOP_WAVE도 뭔지 정의가 되어있지 않구요
아뭏든 보내주신대로 포팅했습니다.
^^ 항상 즐코하세요.
uses MMSystem;
procedure LoadWaveFormResAndPlay;
var
pWaveInfo, hWaveRes: THandle;
lpWaveRes: LPSTR;
IDR_STOP_WAVE: LPSTR; // ??? 정의되지 않음
begin
pWaveInfo := FindResource(NULL, IDR_STOP_WAVE, 'WAVE');
hWaveRes := LoadResource(NULL, pWaveInfo);
lpWaveRes := LockResource(hWaveRes);
sndPlaySound(lpWaveRes, SND_MEMORY or SND_ASYNC);
UnlockResource(hWaveRes);
FreeResource(hWaveRes);
end;
감사합니다..
IDR_STOP_WAVE 는 MFC에서 정의한 상수입니다.. 그건 MFC 뒤져보면 나오겠져..
글구, WAVE는 WAVE파일 이름이져. 리소스에 넣을때 쓴 이름..^^
..님 감사함다..^^ 제가 완성해서 팁모아 올릴께여..^_____^
왕초보 타락천사..^_____^
최용일 wrote:
> 안녕하세요. 최용일입니다.
>
> 완전한 목록을 주시지 않았네요. 그리고 리소스타입에 WAVE라는 것은 없는데...
>
> Wave같은 것은 RCDATA타입으로 읽은데... IDR_STOP_WAVE도 뭔지 정의가 되어있지 않구요
>
> 아뭏든 보내주신대로 포팅했습니다.
>
> ^^ 항상 즐코하세요.
>
> uses MMSystem;
>
> procedure LoadWaveFormResAndPlay;
> var
> pWaveInfo, hWaveRes: THandle;
> lpWaveRes: LPSTR;
> IDR_STOP_WAVE: LPSTR; // ??? 정의되지 않음
> begin
> pWaveInfo := FindResource(NULL, IDR_STOP_WAVE, 'WAVE');
> hWaveRes := LoadResource(NULL, pWaveInfo);
> lpWaveRes := LockResource(hWaveRes);
> sndPlaySound(lpWaveRes, SND_MEMORY or SND_ASYNC);
> UnlockResource(hWaveRes);
> FreeResource(hWaveRes);
> end;