Ako implementovať možnosť zdieľania textu pre android a ios pomocou Delphi - android, ios, facebook, delphi, delphi-10.1-berlin

Používam Delphi 10.1.2 Berlin na vývoj mobilných aplikácií pre Android a iOs. A čelil som problém pre možnosť zdieľania textu na Facebooku.

A ako môžem implementovať možnosť zdieľania textu na Facebooku pomocou súpravy SDK? A nenájdu žiadne jasné súbory pomocníka na zdieľanie textu v FB pomocou Delphi. Prosím, pomôžte mi a vopred vopred.

odpovede:

Tu je multiplatformová verzia:

{$IFDEF iOS}
uses
FMX.Platform, FMX.MediaLibrary;

procedure ShareTextWith(const aText: string);
var
vSharingService: IFMXShareSheetActionsService;
begin
TPlatformServices.Current.SupportsPlatformService(IFMXShareSheetActionsService, vSharingService);
vSharingService.Share(nil, aText, nil);

end;
{$ENDIF}

Tiež môžete použiť ShowShareSheetAction pre obe platformy.