Sound von DLL laden

[Pseudemys Nelsoni]

hi,

ich weiss das es schon einige themen drüber gibt, dennoch stand nicht genau drin wies geht (und wenn war es mit bildern).

also ich habe in eine .RC datei folgendes geschrieben:

"Sound WAVE c:\wav.wav"

dann hab ich mit brcc32 eine .RES, und anschliessen eine dll draus gemacht... nun hab ich versucht den Sound folgendermaßen zu laden

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  hDll: THandle;
Begin
  hDll := LoadLibrary('C:\sound.DLL');
  IF hDll <> 0 Then Begin
    PlaySound('Sound', hDll, SND_SYNC or SND_RESOURCE or SND_NODEFAULT);
    FreeLibrary(hDll);
  end;
end;

funzt aber nicht, warum?

gruss silent

[Luckie]

Bekommst du ein gültiges Handle? Nimm mal einen nummerischen Wert für Sound. Was sagt GetLastError()?

[Pseudemys Nelsoni]

habs mit nem nummerischem versucht, klappt nicht.
Also die "Fehler"meldung ist "Der Vorgang wurde erfolgreich beendet"

gruss silent

[Luckie]

Soundkarte installiert? Lautsärke hoch gedreht? Boxen angeschlossen?

Ansonste:
PlaySound(MAKEINTRESOURCE(1), hDll, SND_SYNC or SND_RESOURCE or SND_NODEFAULT); Für eins deinen Wert einsetzen.

Ich kann es hier nicht testen: Keine Boxen. Sorry.

[Pseudemys Nelsoni]

jo boxen sind dran und sound installiert ( soweit am ende bin ich nun auch noch nicht )....kommt aber dennoch kein sound (hatte sogar musik extra ausgemacht.

sah nun so aus:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  hDll: THandle;
Begin
  hDll := LoadLibrary('C:\sound.DLL');
  IF hDll <> 0 Then Begin
    PlaySound(MAKEINTRESOURCE(1), hDll, SND_SYNC or SND_RESOURCE or SND_NODEFAULT);
    FreeLibrary(hDll);
  end;
end;

[Luckie]

Die res-Datei ist aber in die DLL einkompilert?