Changeset 34 for trunk/Target/UTarget.pas

Timestamp:

Feb 18, 2012, 11:17:14 PM (13 years ago)

Author:

chronos

Message:

• Removed: Action Compile and run. Now Compile is executed before Run action if not compiled yet.

File:

• trunk/Target/UTarget.pas (modified) (2 diffs)

trunk/Target/UTarget.pas

@@ -259 +259 @@
     Process.Free;
   end else raise Exception.Create(Format(SCompilerNotFound, [CompilerPath]));
-end;
-
-procedure TTarget.Run;
-var
-  CompiledFile: string;
-  Process: TProcess;
-begin
+
   CompiledFile := ExtractFilePath(ProjectFileName) +
     'compiled' + DirectorySeparator + Name + DirectorySeparator +
@@ -280 +274 @@
 end;
 
+procedure TTarget.Run;
+begin
+end;
+
 procedure TTarget.Pause;
 begin