X-Git-Url: https://deadsoftware.ru/gitweb?p=d2df-editor.git;a=blobdiff_plain;f=src%2Feditor%2Ff_addresource_sound.pas;h=2dfc49d720e0e7c8505a828866e0fc40f83c9c66;hp=4efa9878cc1be4d8c082dd6f64beb944b94a6131;hb=c3be56f2a3849cd22be39ce594498c7990e05606;hpb=a3962cf56c3e652202f0e9192857c0b15c1398b7

diff --git a/src/editor/f_addresource_sound.pas b/src/editor/f_addresource_sound.pas
index 4efa987..2dfc49d 100644
--- a/src/editor/f_addresource_sound.pas
+++ b/src/editor/f_addresource_sound.pas
@@ -105,7 +105,8 @@ function CreateSoundWAD(Resource: String): Boolean;
 var
   WAD: TWADEditor_1;
   FileName, SectionName, ResourceName: String;
-  ResLength, sz: Integer;
+  ResLength: Integer;
+  sz: LongWord;
   soundExInfo: FMOD_CREATESOUNDEXINFO;
   res: FMOD_RESULT;
 
@@ -126,10 +127,10 @@ begin
       sz := SizeOf(FMOD_CREATESOUNDEXINFO);
       FillMemory(@soundExInfo, sz, 0);
       soundExInfo.cbsize := sz;
-      soundExInfo.length := ResLength;
+      soundExInfo.length := LongWord(ResLength);
 
       res := FMOD_System_CreateStream(F_System, SoundData,
-        FMOD_LOOP_OFF + FMOD_2D + FMOD_SOFTWARE + FMOD_OPENMEMORY,
+        FMOD_LOOP_OFF or FMOD_2D or FMOD_OPENMEMORY,
         @soundExInfo, Sound);
         
       if res <> FMOD_OK then