From d0c65f912b9221522e70f4e385716330891a7220 Mon Sep 17 00:00:00 2001
From: Andreas Schneider <aksdb@gmx.de>
Date: Wed, 27 Aug 2008 20:56:31 +0200
Subject: [PATCH] - Fixed a missing event assignment in TfrmBoundaries (Min/Max
 spinedits didn't react to OnChange) - Fixed a typo in
 cedserver_config_2_3.lpr ("Accesslevel" <> "AccessLevel")

---
 Client/Tools/UfrmBoundaries.lfm                     | 2 ++
 Tools/cedserver_config_2_3/cedserver_config_2_3.lpr | 2 +-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/Client/Tools/UfrmBoundaries.lfm b/Client/Tools/UfrmBoundaries.lfm
index 4915ece..3c2230d 100644
--- a/Client/Tools/UfrmBoundaries.lfm
+++ b/Client/Tools/UfrmBoundaries.lfm
@@ -73,6 +73,7 @@ object frmBoundaries: TfrmBoundaries
       Align = alRight
       MaxValue = 127
       MinValue = -128
+      OnChange = seMinZChange
       ParentFont = True
       TabOrder = 0
       Value = -128
@@ -106,6 +107,7 @@ object frmBoundaries: TfrmBoundaries
       Align = alRight
       MaxValue = 127
       MinValue = -128
+      OnChange = seMaxZChange
       ParentFont = True
       TabOrder = 0
       Value = 127
diff --git a/Tools/cedserver_config_2_3/cedserver_config_2_3.lpr b/Tools/cedserver_config_2_3/cedserver_config_2_3.lpr
index 00aab56..35191e8 100644
--- a/Tools/cedserver_config_2_3/cedserver_config_2_3.lpr
+++ b/Tools/cedserver_config_2_3/cedserver_config_2_3.lpr
@@ -29,7 +29,7 @@ begin
 
   //Accesslevel
   splitPos := Pos(':', AAccountString);
-  WriteXMLString(AElement, 'Accesslevel', Copy(AAccountString, 1, splitPos - 1));
+  WriteXMLString(AElement, 'AccessLevel', Copy(AAccountString, 1, splitPos - 1));
   Delete(AAccountString, 1, splitPos);
 
   lastPos := AElement.OwnerDocument.CreateElement('LastPos');