EgtDOORCreator 2.2j2:
-> aggiunto la possibilità di configurare di non comunicare il messaggio di Configurazione sbagliata (AskMeAgaingConfirm = 0).
This commit is contained in:
+11
-1
@@ -51,7 +51,13 @@ Module RegexFunction
|
||||
Friend Function RemoveComment(sLine As String) As String
|
||||
sLine = sLine.Replace(DDF_METADATA, "§")
|
||||
If sLine.Contains("#"c) Then
|
||||
If Not Part.bFirstConfigRead Then
|
||||
Dim bIgnoreConfig As Boolean = False
|
||||
If Not IsNothing(Map.refAssemblyManagerVM) AndAlso Not IsNothing(Map.refAssemblyManagerVM.CurrProject) AndAlso
|
||||
Not IsNothing(Map.refAssemblyManagerVM.CurrProject.SelAssemblyName) AndAlso
|
||||
Not OptionModule.m_AskMeAgainConfirm Then
|
||||
bIgnoreConfig = Map.refAssemblyManagerVM.CurrProject.SelAssemblyName.Name = Part.LastPartName
|
||||
End If
|
||||
If Not bIgnoreConfig AndAlso Not Part.bFirstConfigRead Then
|
||||
Part.bFirstConfigRead = ReadConfig(sLine)
|
||||
End If
|
||||
sLine = Regex.Match(sLine, "\s*(.*?)\s*#.*$").Groups(1).Value
|
||||
@@ -67,6 +73,8 @@ Module RegexFunction
|
||||
|
||||
' legge la configurazione scritta nelle linee di commento
|
||||
Friend Function ReadConfig(sLine As String) As Boolean
|
||||
' annullo l'ultiam selezione fatta
|
||||
Part.LastPartName = String.Empty
|
||||
' Se non c'è Config esco
|
||||
If Not sLine.Contains("Config") Then Return False
|
||||
' Processo il tipo di configurazione
|
||||
@@ -94,6 +102,8 @@ Module RegexFunction
|
||||
EgtExit()
|
||||
Application.Current.MainWindow.Close()
|
||||
End
|
||||
Else
|
||||
Part.LastPartName = Map.refAssemblyManagerVM.CurrProject.SelAssemblyName.Name
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
|
||||
Reference in New Issue
Block a user