EgtCAM5 1.6s6 :

- gestione flag batch per doors.
2016-07-18 17:46:19 +00:00
parent cf5590a00f
commit 72d481466f
3 changed files with 7 additions and 6 deletions
@@ -282,12 +282,12 @@ Namespace EgtCAM5
                     nPar2 = CInt(Environment.GetCommandLineArgs(2))
                  End If
                  Dim bNcGen As Boolean = (nPar2 >= 1)
+                  Dim bExit As Boolean = (nPar2 >= 2)
                  ' Esecuzione
-                  CreateDoors(sFile, bNcGen)
+                  CreateDoors(sFile, bNcGen, bExit)
                  EgtZoom(ZM.ALL)
                  Application.Msn.NotifyColleagues(Application.EMITTITLE)
                  ' Se richiesta uscita immediata
-                  Dim bExit As Boolean = (nPar2 >= 2)
                  If bExit Then
                     Application.Msn.NotifyColleagues(Application.CLOSEAPPLICATIONCOMMAND)
                  End If