Sharing functionality issue for FaceBook app using Delphi 10.1 Berlin

问题

I'm using Delphi 10.1 Berlin for developing android apps and for this I have tried to implement sharing functionality using the following code:

procedure TBaseForm.ShareDataInAndroid;
var
  Intent: JIntent;
begin
  try
    Intent := TJIntent.Create;
    Intent.setType(StringToJString('text/plain'));
    Intent.setAction(TJIntent.JavaClass.ACTION_SEND);
    Intent.putExtra(TJIntent.JavaClass.EXTRA_TEXT, StringToJString('Delphi Rocks!!!'));
    MainActivity.startActivity(Intent);
  finally
  end;
end;

But the text Delphi Rocks!!! text is shared in all other apps but it is not getting added in facebook app. And please help me to fix this issue.

Also I have tried with the TShowShareSheetAction action event and this facebook occurs.

Thanks in advance.

来源：https://stackoverflow.com/questions/41670287/sharing-functionality-issue-for-facebook-app-using-delphi-10-1-berlin

标签

android