2

Delphi XE4、XE5、および XE6 の両方でテストを行いました。

この公式 iOS シェアシート デモ コードを使用する場合はこちら

次のようになります。

procedure TShareSheetForm.ShowShareSheetAction1BeforeExecute(Sender: TObject);
begin
ShowShareSheetAction1.Bitmap.Assign(imgCameraPicture.Bitmap);
end;

procedure TShareSheetForm.TakePhotoFromCameraAction1DidFinishTaking(Image: TBitmap);
begin
imgCameraPicture.Bitmap.Assign(Image);
end; 

または実際に何が起こるかに近い:

TPlatformServices.Current.SupportsPlatformService(IFMXShareSheetActionsService, IInterface(FSharingService));
FSharingService.Share(btnSocialPicShare, '...', imgSocialPic.Bitmap);

Twitterのみを表示します-少なくともiOS7でテストする場合

Google で検索したところ、Instagram と Facebook (現在) の両方で特別な処理が必要なようです。

例: Instagram: https://instagram.com/developer/iphone-hooks/#

例: Facebook https://developers.facebook.com/docs/ios/share

Delphiを使用してiOS7でFacebook / Instagramなどで画像共有が機能したことはありますか?

4

0 に答える 0