Sub Camera1_Ready (Success As Boolean)
Log("camera ready:" & Success)
If Success Then
camEx.SetPreviewSize(320,240) ' I have hardcoded these values just to test, nothing changed
camEx.CommitParameters
camEx.StartPreview
camEx.SetJpegQuality(90)
camEx.SetPictureSize(320,240) ' I have hardcoded these values just to test, nothing changed
camEx.CommitParameters
camEx.GetPreviewSize ' have put this line to see if the call was working here, no error shown...
Else
ToastMessageShow("Cannot open camera.", True)
End If
End Sub