使用Delphi 10.1 Berlin

Question

我正在使用Delphi 10.1 Berlin开发Android应用程序，为此我尝试使用以下代码实现共享功能：

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;

但文本 Delphi Rocks !!! 文本在所有其他应用程序中共享，但它没有在Facebook应用程序中添加。请帮我解决这个问题。

此外，我已尝试使用TShowShareSheetAction动作事件，并发生此facebook。

提前致谢。