X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-editor.git;a=blobdiff_plain;f=src%2Feditor%2Ff_options.pas;h=91cc695d1e442dc03753e43b1de29ff63e8443a9;hp=8a77b180abf987c647abd3e97d36d7b7b9ae0c2c;hb=ead479e9d67b2199edc9ea45e1243963aac41323;hpb=6e52b3dc2eb459c745e571dfef5afb5c2ccd546f

diff --git a/src/editor/f_options.pas b/src/editor/f_options.pas
index 8a77b18..91cc695 100644
--- a/src/editor/f_options.pas
+++ b/src/editor/f_options.pas
@@ -7,7 +7,7 @@ interface
 uses
   LCLIntf, LCLType, SysUtils, Variants, Classes,
   Graphics, Controls, Forms, Dialogs, StdCtrls,
-  ExtCtrls, ComCtrls, Registry;
+  ExtCtrls, ComCtrls, Registry, Math;
 
 type
 
@@ -182,8 +182,8 @@ begin
     d1 := True
   else
     d1 := False;
-  DotStepOne := StrToIntDef(eDotStepOne.Text, 16);
-  DotStepTwo := StrToIntDef(eDotStepTwo.Text, 8);
+  DotStepOne := EnsureRange(StrToIntDef(eDotStepOne.Text, 16), 4, 2048);
+  DotStepTwo := EnsureRange(StrToIntDef(eDotStepTwo.Text, 8), 4, 2048);
   if d1 then
     DotStep := DotStepOne
   else