1 files changed, 12 insertions, 0 deletions
diff --git a/Game/Code/Classes/UIni.pas b/Game/Code/Classes/UIni.pas
index 682016b8..66bfba26 100644
--- a/Game/Code/Classes/UIni.pas
+++ b/Game/Code/Classes/UIni.pas
@@ -51,6 +51,7 @@ type
     BeatClick:      integer;
     SavePlayback:   integer;
     Threshold:      integer;
+    Delay:          integer;
 
     //Song Preview
     PreviewVolume: integer;
@@ -168,6 +169,8 @@ const
   IBeatClick:     array[0..1] of string = ('Off', 'On');
   ISavePlayback:  array[0..1] of string = ('Off', 'On');
   IThreshold:     array[0..3] of string = ('5%', '10%', '15%', '20%');
+  IDelay:         array[0..9] of string = ('0ms', '10ms', '20ms', '30ms', '40ms', '50ms', '60ms', '70ms', '80ms', '90ms');
+
   //Song Preview
   IPreviewVolume: array[0..10] of string = ('Off', '10%', '20%', '30%', '40%', '50%', '60%', '70%', '80%', '90%', '100%');
   IPreviewFading: array[0..5] of string  = ('Off', '1 Sec', '2 Secs', '3 Secs', '4 Secs', '5 Secs');
@@ -434,6 +437,11 @@ begin
   for Pet := 0 to High(IThreshold) do
     if Tekst = IThreshold[Pet] then Ini.Threshold := Pet;
 
+  // Delay
+  Tekst := IniFile.ReadString('Sound', 'Delay', IDelay[5]);
+  for Pet := 0 to High(IDelay) do
+    if Tekst = IDelay[Pet] then Ini.Delay := Pet;
+
   //Song Preview
   Tekst := IniFile.ReadString('Sound', 'PreviewVolume', IPreviewVolume[7]);
   for Pet := 0 to High(IPreviewVolume) do
@@ -791,6 +799,10 @@ begin
     Tekst := IThreshold[Ini.Threshold];
     IniFile.WriteString('Sound',    'Threshold',    Tekst);
 
+    // Delay
+    Tekst := IDelay[Ini.Delay];
+    IniFile.WriteString('Sound',    'Delay',    Tekst);
+
     // Song Preview
     Tekst := IPreviewVolume[Ini.PreviewVolume];
     IniFile.WriteString('Sound',    'PreviewVolume',    Tekst);