iOS Question Images from Library does not open

Discussion in 'iOS Questions' started by Luiz Fernando Orlandini, Feb 15, 2015.

  1. Luiz Fernando Orlandini

    Luiz Fernando Orlandini Active Member Licensed User

    Hi All.

    I'm trying to implement Camera library, to when I click in a button choose a new picture from user profile.

    I'm trying to follow code.

    Code:
    Private Sub btnChangePhoto_Click
        cam.Initialize(
    "Camera", pg)
        
    If (cam.IsSupported = TrueThen
            
    Try
                cam.SelectFromPhotoLibrary(Me, cam.TYPE_ALL)
            
    Catch
                
    Msgbox(LastException.Description, "Atenção")
            
    End Try
        
    End If
    End Sub

    Private Sub Camera_Complete(Success As Boolean, Image As Bitmap, VideoPath As String)
        
    If Success Then
            
    If Image.IsInitialized Then
                imgResponsible.Bitmap = 
    Image
            
    End If
        
    End If
    End Sub
    When I try to test the application, just open a little small white window, with a right top button cancel and anyone images are listed.

    Thanks.
     
    Last edited: Feb 15, 2015
  2. Erel

    Erel Administrator Staff Member Licensed User

  3. Luiz Fernando Orlandini

    Luiz Fernando Orlandini Active Member Licensed User

    Works fine Erel.

    My challenge now is to preview the image and crop a selected square area to show in a circle Image View.
     
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice