Follow up to previous commit:

- Now that auto limiting doesn't touch EditLimitEnd if it's not too high, the initial limit (50) setting seems to low. Increase it to 5000.
- Only touch EditLimitEnd in auto limiting, set it to EditLimitStart + GetCalculatedLimit, always leave EditLimitStart as it is.

source/childwin.pas

@@ -1341,10 +1341,8 @@ begin
         mainform.CheckBoxLimit.Checked := true;
         tmpLimitStart := MakeInt(mainform.EditLimitStart.Text);
         tmpLimitEnd := MakeInt(mainform.EditLimitEnd.Text);
-        if (tmpLimitEnd - tmpLimitStart) > limit then begin
-          mainform.EditLimitStart.Text := '0';
-          mainform.EditLimitEnd.Text := IntToStr( limit );
-        end;
+        if (tmpLimitEnd - tmpLimitStart) > limit then
+          mainform.EditLimitEnd.Text := IntToStr( tmpLimitStart + limit );
       end;
       mainform.Repaint;
     end;

source/main.dfm

@@ -302,7 +302,7 @@ object MainForm: TMainForm
           Height = 21
           AutoSelect = False
           TabOrder = 2
-          Text = '50'
+          Text = '5000'
           OnEnter = LimitPanelEnter
           OnExit = LimitPanelExit
         end
@@ -326,7 +326,7 @@ object MainForm: TMainForm
           Height = 21
           Associate = EditLimitEnd
           Max = 32767
-          Position = 50
+          Position = 5000
           TabOrder = 4
           Thousands = False
           Wrap = True