- 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")
This commit is contained in:
parent
de21e6efde
commit
d0c65f912b
|
@ -73,6 +73,7 @@ object frmBoundaries: TfrmBoundaries
|
||||||
Align = alRight
|
Align = alRight
|
||||||
MaxValue = 127
|
MaxValue = 127
|
||||||
MinValue = -128
|
MinValue = -128
|
||||||
|
OnChange = seMinZChange
|
||||||
ParentFont = True
|
ParentFont = True
|
||||||
TabOrder = 0
|
TabOrder = 0
|
||||||
Value = -128
|
Value = -128
|
||||||
|
@ -106,6 +107,7 @@ object frmBoundaries: TfrmBoundaries
|
||||||
Align = alRight
|
Align = alRight
|
||||||
MaxValue = 127
|
MaxValue = 127
|
||||||
MinValue = -128
|
MinValue = -128
|
||||||
|
OnChange = seMaxZChange
|
||||||
ParentFont = True
|
ParentFont = True
|
||||||
TabOrder = 0
|
TabOrder = 0
|
||||||
Value = 127
|
Value = 127
|
||||||
|
|
|
@ -29,7 +29,7 @@ begin
|
||||||
|
|
||||||
//Accesslevel
|
//Accesslevel
|
||||||
splitPos := Pos(':', AAccountString);
|
splitPos := Pos(':', AAccountString);
|
||||||
WriteXMLString(AElement, 'Accesslevel', Copy(AAccountString, 1, splitPos - 1));
|
WriteXMLString(AElement, 'AccessLevel', Copy(AAccountString, 1, splitPos - 1));
|
||||||
Delete(AAccountString, 1, splitPos);
|
Delete(AAccountString, 1, splitPos);
|
||||||
|
|
||||||
lastPos := AElement.OwnerDocument.CreateElement('LastPos');
|
lastPos := AElement.OwnerDocument.CreateElement('LastPos');
|
||||||
|
|
Loading…
Reference in New Issue