Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi beliebiger dateipfad für ordner (https://www.delphipraxis.net/167565-beliebiger-dateipfad-fuer-ordner.html)

blubber443 5. Apr 2012 17:13

Delphi-Version: XE2

beliebiger dateipfad für ordner
 
moin, ich hab da ein problem:
ich hab nen ordner für mein kleines spiel andere dateien die ich brauche (bilder, sounds...); das
sieht etwa so aus:
Delphi-Quellcode:
sndPlaySound('C:\ordener1\ordner2\meinspiel\MySound.wav', SND_Loop or SND_ASYNC);
aber falls jemand anders die datei im
ordner C:\ordner1\meinspiel hat klappts nicht mehr.
ich brauch etwa sowas:
Delphi-Quellcode:
sndPlaySound('***\meinspiel\MySound.wav', SND_Loop or SND_ASYNC);
nur halt im richtigen syntax :wink:

Sir Rufo 5. Apr 2012 17:21

AW: beliebiger dateipfad für ordner
 
Delphi-Quellcode:
MyAppPath := ExtractFilePath( ParamStr( 0 ) );
liefert den Pfad der Anwendung

blubber443 5. Apr 2012 17:34

AW: beliebiger dateipfad für ordner
 
bei mir ist dann das problem, dass es halt en string ist und er nen pwidechar braucht
Delphi-Quellcode:
var
  pfad: string;
  soundtrack: string;
...
begin
pfad:=ExtractFilePath(Application.Exename);
soundtrack:=pfad+'\MySound.wav';
sndPlaySound(soundtrack, SND_Loop or SND_ASYNC);
end;
ich hab auch probiert die variablen als PWideChar zu deklarieren

DeddyH 5. Apr 2012 17:46

AW: beliebiger dateipfad für ordner
 
Delphi-Quellcode:
sndPlaySound(PChar(soundtrack), SND_Loop or SND_ASYNC);

blubber443 5. Apr 2012 17:50

AW: beliebiger dateipfad für ordner
 
danke


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

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