Also so:
Delphi-Quellcode:
procedure TForm38.Button4Click(Sender: TObject);
begin
PlaySound(PChar(nil), hInstance, SND_ASYNC or SND_MEMORY or SND_RESOURCE);
end;
funkt es noch nicht. Zeigt zwar keinen Fehler an, aber geht trotzdem nicht aus. Mach ich was falsch?