Changeset 18 for trunk/UMainForm.pas

Timestamp:

Feb 11, 2012, 9:32:25 PM (13 years ago)

Author:

chronos

Message:

• Modified: Optimalized execution of BrainFuck commands using array of methods instead of case statement. This can scale better for future additional commands.
• Added: Interpretter form show speed in steps per second.

File:

• trunk/UMainForm.pas (modified) (2 diffs)

trunk/UMainForm.pas

@@ -58 +58 @@
     MenuItem24: TMenuItem;
     MenuItem25: TMenuItem;
+    MenuItem26: TMenuItem;
     MenuItem40: TMenuItem;
     MenuItem21: TMenuItem;
@@ -307 +308 @@
 procedure TMainForm.AProjectNewExecute(Sender: TObject);
 begin
-  ProjectFileName := 'Project.b';
+  ProjectFileName := 'Examples' + DirectorySeparator + 'Project.b';
   MemoSource.Clear;
   Modified := False;