Não é possível criar pasta e exibir imagem usando o emulador WP7
-
09-12-2019 - |
Pergunta
Eu sou novo no desenvolvimento wp7 tentando com um exemplo simples, ou seja.
Eu tenho um controle de imagem e 2 botões, um para carregar a imagem e exibi-la no controle de imagem e o outro para salvar a imagem em uma nova pasta que preciso criar.
Eu tenho o código abaixo e não estou recebendo nenhum erro, mas o problema é que não consigo criar o diretório e salvar a imagem existente nessa pasta.
Não consigo ver o diretório e também a imagem depois de salvá-lo.
Podemos ver a pasta no emulador(Ou)Só é possível ver o diretório criado no windows phone?
Imports System.IO
Imports Microsoft.Phone.Tasks
Imports System.IO.IsolatedStorage
Imports System.Windows.Media.Imaging
Partial Public Class Page1
Inherits PhoneApplicationPage
Public Sub New()
InitializeComponent()
photoChooserTask = New PhotoChooserTask()
AddHandler photoChooserTask.Completed, AddressOf photoChooserTask_Completed
End Sub
Dim photoChooserTask As PhotoChooserTask
Private Sub photoChooserTask_Completed(sender As Object, e As PhotoResult)
Dim bmp As System.Windows.Media.Imaging.BitmapImage = New System.Windows.Media.Imaging.BitmapImage()
bmp.SetSource(e.ChosenPhoto)
Image1.Source = bmp
Dim originalFilename = Path.GetFileName(e.OriginalFileName)
SaveImage(e.ChosenPhoto, originalFilename, 0, 100)
End Sub
Public Shared Sub SaveImage(ByVal imageStream As Stream, ByVal fileName As String, ByVal orientation As Integer, ByVal quality As Integer)
Using isolatedStorage = IsolatedStorageFile.GetUserStoreForApplication()
If isolatedStorage.FileExists("NewPics\fileName") Then
isolatedStorage.DeleteFile("NewPics\fileName")
End If
If Not isolatedStorage.DirectoryExists("NewPics") Then
isolatedStorage.CreateDirectory("NewPics")
End If
'isolatedStorage.CreateDirectory("NewPics")
'Dim fileStream As New IsolatedStorageFileStream("fileName", FileMode.Create, isolatedStorage)
Dim fileStream = isolatedStorage.CreateFile("NewPics\" + fileName)
Dim bitmap = New BitmapImage()
bitmap.SetSource(imageStream)
Dim wb = New WriteableBitmap(bitmap)
wb.SaveJpeg(fileStream, wb.PixelWidth, wb.PixelHeight, orientation, quality)
fileStream.Close()
End Using
End Sub
Private Sub Button1_Click(sender As Object, e As System.Windows.RoutedEventArgs) Handles Button1.Click
Try
photoChooserTask.Show()
Catch ex As System.InvalidOperationException
MessageBox.Show("An error occurred.")
End Try
End Sub
End Class
Alguém pode me dizer onde estou cometendo erro?
Solução
O código é perfeito, o problema é que o silverlight utiliza “armazenamento isolado” para armazenar arquivos, que é, como o nome indica, um armazenamento completamente isolado.Um arquivo ou diretório criado pelo seu aplicativo estará acessível somente a partir do seu aplicativo.
Acho que o emulador está armazenando os arquivos de armazenamento isolados apenas na memória, já que não precisa mantê-los após a reinicialização.Se você quiser ver facilmente o armazenamento isolado do seu aplicativo, você pode usar uma ferramenta como o Wp7 Explorer: http://wp7explorer.codeplex.com/