Thema: Delphi WAV Datei abspielen?

Einzelnen Beitrag anzeigen

Benutzerbild von Duffy
Duffy

Registriert seit: 19. Mär 2003
Ort: Wuppertal
835 Beiträge
 
Delphi 3 Standard
 
#2

Re: WAV Datei abspielen?

  Alt 21. Dez 2004, 06:59
Hallo Pseudemys Nelsoni
Delphi-Quellcode:
var
  FindHandle, ResHandle: THandle;
  ResPtr: Pointer;
begin
  FindHandle := FindResource(HInstance, ResourceName, ResourceType);
  ResHandle := LoadResource(HInstance, FindHandle);
  ResPtr := LockResource(ResHandle);
  sndPlaySound(PChar(ResPtr), snd_Async OR snd_Memory);
  UnlockResource(ResHandle);
  FreeResource(FindHandle);
end;
versuch es mal so ...

bye
Claus
Künftige Generationen wollen ihre Fehler selber machen.
Jedes Programm wird nie das können, was Du wirklich brauchst.
Das Gegenteil von gut ist gut gemeint
-----
  Mit Zitat antworten Zitat