Sample CameraComponent keine Berechtigung Delphi 10.4.1 iOS13.7

[jayjay77]

Hallo Zusammen,

vielleicht könnt Ihr mir helfen, im Netzt finde ich immer nur Infos zu Android Apps.


Ich habe das von Embarcadero mitgelieferte CameraComponent Demo erzeugt und auf das iPad übertragen.
C:\Users\Public\Documents\Embarcadero\Studio\21.0\ Samples\Object Pascal\Mobile Snippets\CameraComponent

Die App bekommt keine Berechtigung auf die Kamera zuzugreifen?

Delphi Meldung:
Im Projekt ...ist eine Exception der Klasse ECaptureDeviceException mit der Meldung " aufgetreten

iPad Meldung:
Fehler Keine Berechtigung zum Aufzeichnen von Video

ipad 13.7
Delphi 10.4.1 Pro
MacOS 10.15.6
PAServer 12.1.10.3

Die info.plist.TemplateiOS.xml Datei habe ich auch angepasst.

Code:

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<%VersionInfoPListKeys%>
<%ExtraInfoPListKeys%>
 <key>NSCameraUsageDescription</key>
 <string>This app needs access to camera</string>
<%StoryboardInfoPListKey%>
</dict>
</plist>

hier die CameraComponent.info.plist Datei

Code:

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
   <key>CFBundleName</key>
   <string>CameraComponent</string>
   <key>CFBundleDevelopmentRegion</key>
   <string>en</string>
   <key>CFBundleDisplayName</key>
   <string>CameraComponent</string>
   <key>CFBundleIdentifier</key>
   <string>XXXXXXXXXXXX</string>
   <key>CFBundleInfoDictionaryVersion</key>
   <string>7.1</string>
   <key>CFBundleVersion</key>
   <string>1.0.0</string>
   <key>CFBundleShortVersionString</key>
   <string>1.0.0</string>
   <key>CFBundlePackageType</key>
   <string>APPL</string>
   <key>CFBundleSignature</key>
   <string>????</string>
   <key>LSRequiresIPhoneOS</key>
   <true/>
   <key>CFBundleAllowMixedLocalizations</key>
   <true/>
   <key>CFBundleExecutable</key>
   <string>CameraComponent</string>
   <key>UIDeviceFamily</key>
   <array>
      <integer>1</integer>
      <integer>2</integer>
   </array>
   <key>NSLocationAlwaysUsageDescription</key>
   <string>The reason for accessing the location information of the user</string>
   <key>NSLocationWhenInUseUsageDescription</key>
   <string>The reason for accessing the location information of the user</string>
   <key>NSLocationAlwaysAndWhenInUseUsageDescription</key>
   <string>The reason for accessing the location information of the user</string>
   <key>UIBackgroundModes</key>
   <array>
   </array>
   <key>NSContactsUsageDescription</key>
   <string>The reason for accessing the contacts</string>
   <key>NSPhotoLibraryUsageDescription</key>
   <string>The reason for accessing the photo library</string>
   <key>NSPhotoLibraryAddUsageDescription</key>
   <string>The reason for adding to the photo library</string>
   <key>NSCameraUsageDescription</key>
   <string>The reason for accessing the camera</string>
   <key>NSFaceIDUsageDescription</key>
   <string>The reason for accessing the face id</string>
   <key>NSMicrophoneUsageDescription</key>
   <string>The reason for accessing the microphone</string>
   <key>NSSiriUsageDescription</key>
   <string>The reason for accessing Siri</string>
   <key>ITSAppUsesNonExemptEncryption</key>
   <false/>
   <key>NSBluetoothAlwaysUsageDescription</key>
   <string>The reason for accessing bluetooth</string>
   <key>NSBluetoothPeripheralUsageDescription</key>
   <string>The reason for accessing bluetooth peripherals</string>
   <key>NSCalendarsUsageDescription</key>
   <string>The reason for accessing the calendar data</string>
   <key>NSRemindersUsageDescription</key>
   <string>The reason for accessing the reminders</string>
   <key>NSMotionUsageDescription</key>
   <string>The reason for accessing the accelerometer</string>
   <key>NSSpeechRecognitionUsageDescription</key>
   <string>The reason for requesting to send user data to Apple's speech recognition servers</string>

   <key>UISupportedInterfaceOrientations</key>
   <array>
      <string>UIInterfaceOrientationPortrait</string>
      <string>UIInterfaceOrientationPortraitUpsideDown</string>
      <string>UIInterfaceOrientationLandscapeLeft</string>
      <string>UIInterfaceOrientationLandscapeRight</string>
   </array>
   <key>UISupportedInterfaceOrientations~ipad</key>
   <array>
      <string>UIInterfaceOrientationPortrait</string>
      <string>UIInterfaceOrientationPortraitUpsideDown</string>
      <string>UIInterfaceOrientationLandscapeLeft</string>
      <string>UIInterfaceOrientationLandscapeRight</string>
   </array>
   <key>NSAppTransportSecurity</key>
   <dict>
      <key>NSAllowsArbitraryLoads</key>
      <true/>
   </dict>
   <key>UIRequiredDeviceCapabilities</key>
   <array>
      <string>arm64</string>
   </array>
   <key>CFBundleSupportedPlatforms</key>
   <array>
      <string>iPhoneOS</string>
   </array>
   <key>MinimumOSVersion</key>
   <string>11.0</string>

<key>NSPhotoLibraryUsageDescription</key>
<string>XXX requires access to your photo library</string>
<key>NSCameraUsageDescription</key>
<string>XXX requires access to your phone&#11488;camera to scan QR tags</string>
   <key>UILaunchStoryboardName</key>
   <string>LaunchScreen</string>

</dict>
</plist>

Evtl könnt Ihr das original Demo auch mal mit 10.4.1 testen.
Mit Delphi 10.3.3 hat das alles noch funktioniert.

Danke und Grüße