Exemple #1
0
 void VisualEnvironmentCompiler_ChangeVisualEnvironmentState(VisualEnvironmentState State, object obj)
 {
     switch (State)
     {
     case VisualEnvironmentState.ProcessStarting:
     case VisualEnvironmentState.ProcessStartingDebug:
     case VisualEnvironmentState.ProcessExited:
         string FileName = (string)obj;
         if (CompiledProgrammsWithPT4Unit.ContainsKey(FileName))
         {
             string PasDir = Path.GetDirectoryName(CompiledProgrammsWithPT4Unit[FileName]);
             string ExeDir = Path.GetDirectoryName(FileName);
             if (PasDir.ToLower() != ExeDir.ToLower())
             {
                 if (State == VisualEnvironmentState.ProcessExited)
                 {
                     CopyResultsABC(ExeDir, PasDir);
                     CompiledProgrammsWithPT4Unit.Remove(FileName);
                 }
                 else
                 {
                     if (File.Exists(PasDir + "\\" + PT4Provider.Constants.ResultsABCFileName))
                     {
                         CopyResultsABC(PasDir, ExeDir);
                     }
                     else
                     {
                         CopyResultsABC(PT4Directory, ExeDir);
                     }
                 }
             }
             else
             {
                 if (State != VisualEnvironmentState.ProcessExited)
                 {
                     if (!File.Exists(PasDir + "\\" + PT4Provider.Constants.ResultsABCFileName))
                     {
                         CopyResultsABC(PT4Directory, ExeDir);
                     }
                 }
             }
         }
         break;
     }
 }
Exemple #2
0
 void VisualEnvironmentCompiler_ChangeVisualEnvironmentState(VisualEnvironmentState State, object obj)
 {
     switch (State)
     {
         case VisualEnvironmentState.StartCompilerLoading:
             this.Text = String.Format(FTSFormat,MainFormText,Form1StringResources.Get("FTS_LOADING"));
             break;
         case VisualEnvironmentState.FinishCompilerLoading:
             //this.Text = String.Format("{0} v{1}",MainFormText,PascalABCCompiler.Compiler.ShortVersion);
             this.Text = MainFormText;
             openFileDialog1.Filter = saveFileDialog1.Filter = VisualEnvironmentCompiler.GetFilterForDialogs();
             break;
     }
 }
 void onChangeVisualEnvironmentState(VisualEnvironmentState State, object obj)
 {
 }
        void onChangeVisualEnvironmentState(VisualEnvironmentState State, object obj)
        {

        }
 void VisualEnvironmentCompiler_ChangeVisualEnvironmentState(VisualEnvironmentState State, object obj)
 {
     switch (State)
     {
         case VisualEnvironmentState.ProcessStarting:
         case VisualEnvironmentState.ProcessStartingDebug:
         case VisualEnvironmentState.ProcessExited:
             string FileName = (string)obj;
             if(CompiledProgrammsWithPT4Unit.ContainsKey(FileName))
             {
                 string PasDir = Path.GetDirectoryName(CompiledProgrammsWithPT4Unit[FileName]);
                 string ExeDir = Path.GetDirectoryName(FileName);
                 if (PasDir.ToLower() != ExeDir.ToLower())
                 {
                     if (State == VisualEnvironmentState.ProcessExited)
                     {
                         CopyResultsABC(ExeDir, PasDir);
                         CompiledProgrammsWithPT4Unit.Remove(FileName);
                     }
                     else
                     {
                         if (File.Exists(PasDir + "\\" + PT4Provider.Constants.ResultsABCFileName))
                             CopyResultsABC(PasDir, ExeDir);
                         else
                             CopyResultsABC(PT4Directory, ExeDir);
                     }
                 }
                 else
                 {
                     if (State != VisualEnvironmentState.ProcessExited)
                         if (!File.Exists(PasDir + "\\" + PT4Provider.Constants.ResultsABCFileName))
                             CopyResultsABC(PT4Directory, ExeDir);
                 }
             }
             break;
     }
 }