OmagCUT 1.8g3 :

- gestione caricamento/salvataggio progetto riferito a immagine non visualizzabile.
This commit is contained in:
Dario Sassi
2017-07-22 11:01:57 +00:00
parent 99a4328a40
commit b77d3aa71f
2 changed files with 8 additions and 2 deletions
+6
View File
@@ -394,6 +394,8 @@ Public Class CurrentProjectPageUC
If Not String.Equals(sPhoto, sNewPhoto, StringComparison.InvariantCultureIgnoreCase) Then
Try
File.Copy(sPhoto, sNewPhoto, True)
Catch ex As FileNotFoundException
' non è un problema
Catch ex As Exception
Return False
End Try
@@ -404,6 +406,7 @@ Public Class CurrentProjectPageUC
Else
Dim sPhoto1 As String = Path.ChangeExtension(sPath, "jpg")
Dim sPhoto2 As String = Path.ChangeExtension(sPath, "png")
Dim sPhoto3 As String = Path.ChangeExtension(sPath, "bmp")
Try
If My.Computer.FileSystem.FileExists(sPhoto1) Then
My.Computer.FileSystem.DeleteFile(sPhoto1)
@@ -411,6 +414,9 @@ Public Class CurrentProjectPageUC
If My.Computer.FileSystem.FileExists(sPhoto2) Then
My.Computer.FileSystem.DeleteFile(sPhoto2)
End If
If My.Computer.FileSystem.FileExists(sPhoto3) Then
My.Computer.FileSystem.DeleteFile(sPhoto3)
End If
Catch ex As Exception
End Try
End If
+2 -2
View File
@@ -60,5 +60,5 @@ Imports System.Windows
' by using the '*' as shown below:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.8.7.2")>
<Assembly: AssemblyFileVersion("1.8.7.2")>
<Assembly: AssemblyVersion("1.8.7.3")>
<Assembly: AssemblyFileVersion("1.8.7.3")>