TShareContract/ShareContractFramework

[TurboMagic]

Hallo,

wenn ich ShareSheet1.InitSharing (also einfach nur die Komponente auf die Form gepackt und dort nix verstellt) aufrufe
kommt nur die Zeite unter Ereignissen hinzu:

Module Load: twinapi.appcore.dll. No Debug Info. Base Address: $5EDD0000. Process Project1.exe (9140)

Mit Debug DCUs springt er in

procedure TCustomSharingContract.InitSharing;

Dort wird alles erzeugt und dann TShareContract.InitSharing; aufgerufen. Dort dann
TDataTransferManager.Interop.ShowShareUIForWindow( FWindowHandle) und FWindowHandle hat auch irgend einen Wert.

Danach landet man hier drin: class function TWinRTGenericImportS3O<S1, S2, S3, O>.GetInterop: O; und wenn man
aus der zurück kommt ist man am Ende von TDataTransferManager.Interop.ShowShareUIForWindow( FWindowHandle) und
dort dann gleich wieder am Ende von TShareContract.InitSharing; usw. und nix wurde angezeigt...

Weitere Tests ggf. morgen oder so, heute Abend schon etwas spät dafür. Muss das auch mal mit dem separaten
Testprogramm vergleichen.