EgtDOORCreator 2.1j2:
-> correzioni creazione nuovo progetto.
This commit is contained in:
@@ -975,9 +975,9 @@ Public Class AssemblyManagerVM
|
||||
Else
|
||||
Dim LastProject As String = m_CurrProject.Name
|
||||
' confermo che non devono essere prese inconsiderazione le modifiche
|
||||
m_CurrProject.SelAssemblyName.IsModified = False
|
||||
'm_CurrProject.SelAssemblyName.IsModified = False
|
||||
' elimino qualsiasi resto di porta
|
||||
m_CurrProject.SelAssemblyName = Nothing
|
||||
'm_CurrProject.SelAssemblyName = Nothing
|
||||
' pulisco entry page
|
||||
Map.refMainWindowVM.SelectedPage = MainWindowVM.ListPageEnum.nNothingSelected
|
||||
' aggiorno il titolo della pagina
|
||||
@@ -1514,7 +1514,11 @@ Public Class AssemblyManagerVM
|
||||
SaveFileDialog.Directory = m_CurrProject.Name
|
||||
SaveFileDialog.Extension = DDF_EXTENSION
|
||||
' Se annullo esco
|
||||
If Not SaveFileDialogWnd.ShowDialog Then Return
|
||||
If Not SaveFileDialogWnd.ShowDialog Then
|
||||
'm_CurrProject.SelAssemblyName = New AssemblyName
|
||||
m_CurrProject.SelAssemblyName = Nothing
|
||||
Return
|
||||
End If
|
||||
Dim FilePath As String = Path.GetFileNameWithoutExtension(SaveFileDialog.FileName)
|
||||
SaveFileDialog.FileName = SaveFileDialog.FileName.Replace(FilePath, Trim(FilePath))
|
||||
' Controllo se il nome della porta ha estensione
|
||||
|
||||
Reference in New Issue
Block a user