Advanced camera library causing error on some devices and not others.

[Mickster]

Hey guys,

I'm using this library to change the resolution of images I'm taking on a Toshiba Thrive device, which is working perfectly fine. We are also running the same code on a Motorola Xoom tablet (very similar in specs to the thrive) and the line that modifies the resolution is causing a runtimeexception.

Has anyone seen this before?

Here is the routine causing the crash:

Sub Camera1_Ready (Success As Boolean)

    If Success Then
'        Camera1.PictureSize(pnlCamera.Width, pnlCamera.Height)
        Camera1.StartPreview
        btnTakePicture.Enabled = True
    Else
        ToastMessageShow("Cannot open camera.", True)
    End If
    
End Sub

I commented out the line that is causing the issue for clarity.

Thanks

 

[vb1992]

your best bet is to take a look at this example code
to understand ACL a little better

http://www.b4x.com/forum/basic4andr...advanced-camera-sample-problem.html#post76953

 

[Ian Garton]

Different devices support different image resolutions.

I had to use the SupportedPictureSize property, and the getSupportedPictureSizeWidth and getSupportedPictureSizeHeight methods to work out a suitable size at runtime.

 

[Mickster]

Please would you show an example? I'm unsure how these methods work.:sign0104:

 

[vb1992]

I believe the link I posted above had an example to show you...

 

[Mickster]

Ah, I should have been more specific. I was asking Ian Garton to elaborate!

Different devices support different image resolutions.

I had to use the SupportedPictureSize property, and the getSupportedPictureSizeWidth and getSupportedPictureSizeHeight methods to work out a suitable size at runtime.

 

[vb1992]

I don't know, if someone told me to look in the example link for the answer...
I would...

because the answer is there,
I would have opened up the file

this is inside

Try
      lstResolution.Clear
      For i = 0 To objCamera.SupportedPictureSize - 1
         lstResolution.Add(objCamera.getSupportedPictureSizeWidth(i) & "x" & objCamera.getSupportedPictureSizeHeight(i))
         If objCamera.CurrentPictureSizeWidth= objCamera.getSupportedPictureSizeWidth(i) AND _
         objCamera.CurrentPictureSizeHeight = objCamera.getSupportedPictureSizeHeight(i) Then
            LastResolution = lstResolution.Get(i)
         End If
      Next
   Catch
   End Try