Delphi 10.2.2 Firemonkey: Smart Lock / iCloud-Schlüsselbund

[Loko789]

Ich sehe da ein paar funktionen

Delphi-Quellcode:

function TDPFiCloud.GetValue( const key: string; DefValue: string ): string;
var
  keyStore: NSUbiquitousKeyValueStore;
  ns      : NSString;
begin
  result   := DefValue;
  keyStore := TNSUbiquitousKeyValueStore.Wrap( TNSUbiquitousKeyValueStore.OCClass.defaultStore );
  ns       := keyStore.stringForKey( NSStr( key ) );
  if assigned( ns ) then
    result := UTF8ToString( ns.UTF8String );
end;
// ------------------------------------------------------------------------------
function TDPFiCloud.SetValue( const key: string; const value: string ): Boolean;
var
  keyStore: NSUbiquitousKeyValueStore;
begin
  keyStore := TNSUbiquitousKeyValueStore.Wrap( TNSUbiquitousKeyValueStore.OCClass.defaultStore );
  keyStore.setString( NSStr( value ), NSStr( key ) );
  result := keyStore.synchronize;
end;

Aber ich bezweifle es, dass es die iCloud-Schlüsselbund Daten sind. Ich glaube, damit komme ich nicht weit.