X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fengine%2Fe_soundfile.pas;h=6cae52c6a5739335df7329212bfed65d266f09cf;hb=1091a54dd9996ee2bc7620dfed900d64d066af88;hp=919715c5dea3dc3da6a7a9242748b10e5af7f87a;hpb=aac50c080dd2ec5b189a5739456d593e48791aaf;p=d2df-sdl.git

diff --git a/src/engine/e_soundfile.pas b/src/engine/e_soundfile.pas
index 919715c..6cae52c 100644
--- a/src/engine/e_soundfile.pas
+++ b/src/engine/e_soundfile.pas
@@ -34,6 +34,7 @@ type
   protected
     FFormat: TSoundFormat;
     FStreaming: Boolean;
+    FLooping: Boolean;
 
   public
     function Load(Data: Pointer; Len: LongWord; SStreaming: Boolean): Boolean; virtual; abstract; overload;
@@ -48,6 +49,7 @@ type
 
     property Format: TSoundFormat read FFormat;
     property Streaming: Boolean read FStreaming;
+    property Looping: Boolean read FLooping write FLooping;
   end;
 
   TSoundLoaderFactory = class