Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  AW: TWindowsStore

   
    by Michael II, 5. Jul 2019
  Besten Dank hoika für deine Antwort.
  
  Ich verwende zur Berechnung der verbleibenden Testzeit die Anleitung zu TWindowsStore von der embarcadero Seite:
  
  http://docwiki.embarcadero.com/RADStudio/Rio/en/Using_the_WindowsStore_Component
  
  oder wie es hier beschrieben wird:
  
  https://blogs.msmvps.com/bsonnino/2019/02/26/monetizing-your-delphi-app-with-twindowsstore/
• Forum: Win32/Win64 API (native code)

  AW: TWindowsStore

   
    by Michael II, 4. Jul 2019
  Ich verwende nun obige Funktion, habe aber TWindowsStore auf die Hauptform gelegt und erzeuge die Komponente nicht zur Laufzeit.
  
  Ich habe eine App in den Microsoft Store raufgeladen und biete einen Testzeitraum von 7 Tagen an.
  
  Meine App habe ich als Testversion aus dem Store heruntergeladen. Obige Funktion erkennt korrekt auf Testversion, aber ...
• Forum: Win32/Win64 API (native code)

  TWindowsStore

   
    by Michael II, 4. Jul 2019
  Weiss jemand, ob man TWindowsStore wiederholt zur Laufzeit erzeugen kann? Oder führt dies zu Problemen?
  
  http://docwiki.embarcadero.com/RADStudio/Rio/en/Using_the_WindowsStore_Component
  
  function TSwissJassForm.UWPOK( var LRemainingTrialDays : integer ) : integer;
  // -1 : Fehler, 0 : AppLicense.isActive=false, 1 : Trial, 2 : Voll
  var
  WindowsStore1 : TWindowsStore;
  res : integer;