added an option to change rotaion-box behaviour in main window

This commit is contained in:
zueuk
2005-10-29 18:16:33 +00:00
parent 4697a1d594
commit be57c8d9a4
5 changed files with 89 additions and 72 deletions

View File

@ -351,6 +351,10 @@ begin
if Registry.ValueExists('ReferenceMode') then
ReferenceMode := Registry.ReadInteger('ReferenceMode')
else ReferenceMode := 0;
if Registry.ValueExists('RotationMode') then
MainForm_RotationMode := Registry.ReadInteger('RotationMode')
else MainForm_RotationMode := 0;
if Registry.ValueExists('MaxLum') then
begin
MaxLum := Registry.ReadInteger('MaxLum');
@ -517,6 +521,7 @@ begin
else
begin
ReferenceMode := 0;
MainForm_RotationMode := 0;
EditPrevQual := 1;
MutatePrevQual := 1;
AdjustPrevQual := 1;
@ -884,6 +889,7 @@ begin
Registry.WriteInteger('SymmetryNVars', SymmetryNVars);
Registry.WriteInteger('VariationOptions', VariationOptions);
Registry.WriteInteger('ReferenceMode', ReferenceMode);
Registry.WriteInteger('RotationMode', MainForm_RotationMode);
Registry.WriteInteger('MinNodes', MinNodes);
Registry.WriteInteger('MinHue', MinHue);
Registry.WriteInteger('MinSat', MinSat);