Changeset 70 for trunk/Forms/UFormMain.pas

Timestamp:

Oct 11, 2015, 6:50:33 PM (9 years ago)

Author:

chronos

Message:

• Fixed: Remember MemorySize and CellSize globally for all projects and targets.

File:

• trunk/Forms/UFormMain.pas (modified) (2 diffs)

trunk/Forms/UFormMain.pas

@@ -167 +167 @@
 uses
   UCore, UFormCPU, UFormOptions, UFormMessages, UFormTargets, UFormOutput, UFormInput,
-  UFormMemory, UFormSourceCode, UFormTargetCode, UTargetInterpretter, UFormLog;
+  UFormMemory, UFormSourceCode, UFormTargetCode, UTargetInterpretter, UFormLog,
+  UBFTarget;
 
 resourcestring
@@ -454 +455 @@
 begin
   OptionsForm.Load;
-  //OptionsForm.LoadFromInterpretter(CurrentTarget);
   if OptionsForm.ShowModal = mrOK then begin
-    //OptionsForm.SaveToInterpretter(CurrentTarget);
     OptionsForm.Save;
-    if Assigned(Core.CurrentTarget) then
+    if Assigned(Core.CurrentTarget) then begin
       Core.CurrentTarget.OptimizationLevel := Core.OptimizationLevel;
+      if Core.CurrentTarget is TBFTarget then begin
+        TBFTarget(Core.CurrentTarget).CellSize := Core.CellSize;
+        TBFTarget(Core.CurrentTarget).MemorySize := Core.MemorySize;
+      end;
+    end;
   end;
 end;