fixed variation checklist

2.10/Source/Options.pas

@@ -356,7 +356,7 @@ end;
 
 procedure TOptionsForm.btnOKClick(Sender: TObject);
 var
-  v: integer;
+  v: int64;
   i: integer;
 begin
 

2.10/Source/Regstry.pas

@@ -28,7 +28,7 @@ implementation
 
 uses Windows, SysUtils, Forms, Registry, Global, Dialogs, XFormMan;
 
-procedure UnpackVariations(v: integer);
+procedure UnpackVariations(v: int64);
 { Unpacks the variation options form an integer }
 var
   i: integer;
@@ -37,7 +37,6 @@ begin
     Variations[i] := boolean(v shr i and 1);
 end;
 
-
 procedure ReadSettings;
 var
   Registry: TRegistry;