Yes, this is my UI. It works ok with my another android
Sub Activity_Resume
InitializeCamera
End Sub
Private Sub InitializeCamera
CameraEx.Initialize(pnlCamera, frontCamera, Me, "Camera")
frontCamera = CameraEx.Front
End Sub
Sub Camera_ready (Success As Boolean )
If Success Then
CameraEx.SetJpegQuality(90)
CameraEx.SetPreviewSize (640, 384)
CameraEx.CommitParameters
CameraEx.StartPreview
Log(CameraEx.GetPreviewSize)
Else
ToastMessageShow("Cannot open camera.", True)
End If
End Sub
basically, I just copy from the sample.