Hi,
this is my code
This produces no distortion.
When I reverse the variables for fullscreen and includetitle to true and false, the picture becomes distsorted, everything is too wide. Setpicturesize does not help.
What am I doing wrong?
Thank you
Peter
this is my code
B4X:
#Region Activity Attributes
#FullScreen: false
#IncludeTitle: true
#End Region
Private Sub InitializeCamera
Try
camEx.Initialize(Panel1, frontCamera, Me, "Camera1")
frontCamera = camEx.Front
Catch
Dim s As String
s="Camera Resume " & LastException.Message
Log (s)
Main.prot.Add (s)
End Try
End Sub
Sub camera1_Ready (Success As Boolean)
Try
If Success Then
camEx.SetJpegQuality(Settings.jpgquality)
camEx.CommitParameters
' camEx.SetPictureSize (Panel1.Width,Panel1.Height)
camEx.StartPreview
Log(camEx.GetPreviewSize)
camerasetbuttons
Else
ToastMessageShow("Die Kamera funktioniert nicht.", True)
End If
Catch
Dim s As String
s="Camera ready " & LastException.Message
Log (s)
Main.prot.Add (s)
End Try
End Sub
This produces no distortion.
When I reverse the variables for fullscreen and includetitle to true and false, the picture becomes distsorted, everything is too wide. Setpicturesize does not help.
What am I doing wrong?
Thank you
Peter