Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Sound- Dateien aus einer dll abspielen. (https://www.delphipraxis.net/44619-sound-dateien-aus-einer-dll-abspielen.html)

smart 21. Apr 2005 18:20


Sound- Dateien aus einer dll abspielen.
 
Ich benutze diesen Code, um Sound- Dateien aus einer dll ab zuspielen.

Delphi-Quellcode:
uses MMSystem;

var
  dll_handle : HInstance;
begin
   dll_handle:=LoadLibraryEX('SOUND.dll',0,LOAD_LIBRARY_AS_DATAFILE);
   PlaySound('OSTERN', dll_handle, SND_RESOURCE);
   FreeLibrary(dll_handle);
end;
Leider bekomme ich immer die Fehlermeldung: Konstante oder Typenbezeichner erwartet.
Hat Einer von Euch einen Tipp was ich da falsch mache?

Meflin 21. Apr 2005 18:38

Re: Sound- Dateien aus einer dll abspielen.
 
an welcher stelle bekommst du den fehler :?:


SirThornberry 21. Apr 2005 18:43

Re: Sound- Dateien aus einer dll abspielen.
 
nimm anstelle von LoadLibraryEX doch nur LoadLibrary.

desweiteren würde ich das nicht so machen
Delphi-Quellcode:
dll_handle : HInstance;
sondern einfach den Typ Cardinal nehmen
Delphi-Quellcode:
dll_handle : Cardinal;
da HInstance schon eine globale Variable für die aktuelle Instanz ist.

smart 21. Apr 2005 18:59

Re: Sound- Dateien aus einer dll abspielen.
 
Hier kommt die Fehlermeldung

Delphi-Quellcode:
var
  dll_handle : HInstance; <- Hier kommt die Fehlermeldung
begin
   dll_handle:=LoadLibraryEX('SOUND.dll',0,LOAD_LIBRARY_AS_DATAFILE);
   PlaySound('OSTERN', dll_handle, SND_RESOURCE);
   FreeLibrary(dll_handle);
end;

SirThornberry 21. Apr 2005 19:03

Re: Sound- Dateien aus einer dll abspielen.
 
wie schon geschrieben liegt es daran das "HInstance" kein Typ ist sondern eine Globale Variable welche die aktuelle Instanz darstellt. Schreibe anstelle von "HInstance" einfach "Cardinal". Hoffe du überliest es diesmal nicht wieder :?

smart 21. Apr 2005 19:05

Re: Sound- Dateien aus einer dll abspielen.
 
Vielen Dank, SirThornberry! hat hingehauen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:13 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz