mirror-github-bspeice/apophysis
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

small fixes

Browse Source
This commit is contained in:
zueuk
2006-03-22 13:58:26 +00:00
parent 7264e2ac56
commit f5adf098b3
4 changed files with 20 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
2.10/Source/Regstry.pas
View File

@ -277,7 +277,9 @@ begin
end;
if Registry.ValueExists('VariationOptions') then
begin
VariationOptions := Registry.ReadInteger('VariationOptions');
Registry.ReadBinaryData('VariationOptions', VariationOptions, 8);
// Delphi_Suxx := Registry.ReadString('VariationOptions');
// VariationOptions := StrToInt64(Delphi_Suxx);
end
else
begin
@ -940,7 +942,7 @@ begin
Registry.WriteInteger('SymmetryType', SymmetryType);
Registry.WriteInteger('SymmetryOrder', SymmetryOrder);
Registry.WriteInteger('SymmetryNVars', SymmetryNVars);
Registry.WriteInteger('VariationOptions', VariationOptions);
Registry.WriteBinaryData('VariationOptions', VariationOptions, 8);
Registry.WriteInteger('ReferenceMode', ReferenceMode);
Registry.WriteInteger('RotationMode', MainForm_RotationMode);
Registry.WriteInteger('MinNodes', MinNodes);