Ciao a tutti
Sto lavorando alla seconda versione di alfadesk e mi sono scontrato in questo problema
Ho problema nel caricamento di una immagine nell'oggetto imageview
All'interno di un Activity nella Activity_Resume ho il seguente codice
....
If File.Exists(Main.v_path_fotocamera, "Img_pri.jpg") = True Then
ImgAna.Bitmap =LoadBitmap(Main.v_path_fotocamera,"Img_pri.jpg")
Else
ImgAna.Bitmap =LoadBitmap(File.DirAssets, "logouno.jpg")
End If
..
L'app permette da questa activity di lanciarne altre e ovviamente al ritorno della principale l'app ripassa per per rieseguire l'activity_resume.
al momento di ricaricare l'immagine l'app mi dice che si e' bloccata in modo anomalo
Non ho la possibilita' di mettere il codice nella Activity_Create inquanto l'immagine Img_pri.jpg potrebbe essere sostituita dall'utente dell'app.
ho provato anche con questa versione di codice ma senza esito
Dim img_tmp As Bitmap
If File.Exists(Main.v_path_fotocamera, "Img_pri.jpg") = True Then
img_tmp=LoadBitmap(Main.v_path_fotocamera,"Img_pri.jpg")
ImgAna.SetBackgroundImage(img_tmp)
Else
img_tmp=LoadBitmap(File.DirAssets, "logouno.jpg")
ImgAna.SetBackgroundImage(img_tmp)
End If
Qualcuno ha qualche idea
Sto lavorando alla seconda versione di alfadesk e mi sono scontrato in questo problema
Ho problema nel caricamento di una immagine nell'oggetto imageview
All'interno di un Activity nella Activity_Resume ho il seguente codice
....
If File.Exists(Main.v_path_fotocamera, "Img_pri.jpg") = True Then
ImgAna.Bitmap =LoadBitmap(Main.v_path_fotocamera,"Img_pri.jpg")
Else
ImgAna.Bitmap =LoadBitmap(File.DirAssets, "logouno.jpg")
End If
..
L'app permette da questa activity di lanciarne altre e ovviamente al ritorno della principale l'app ripassa per per rieseguire l'activity_resume.
al momento di ricaricare l'immagine l'app mi dice che si e' bloccata in modo anomalo
Non ho la possibilita' di mettere il codice nella Activity_Create inquanto l'immagine Img_pri.jpg potrebbe essere sostituita dall'utente dell'app.
ho provato anche con questa versione di codice ma senza esito
Dim img_tmp As Bitmap
If File.Exists(Main.v_path_fotocamera, "Img_pri.jpg") = True Then
img_tmp=LoadBitmap(Main.v_path_fotocamera,"Img_pri.jpg")
ImgAna.SetBackgroundImage(img_tmp)
Else
img_tmp=LoadBitmap(File.DirAssets, "logouno.jpg")
ImgAna.SetBackgroundImage(img_tmp)
End If
Qualcuno ha qualche idea