Как поделиться изображением и текстом вместе на Delphi 10.3.3 в приложении для Android - PullRequest
1 голос
/ 26 февраля 2020

Delphi 10.3.3, пытаясь поделиться картинкой (растровым изображением) и текстом вместе в одном действии в моем приложении Android. Тем не менее, только картинка становится общедоступной, а текст отсутствует в общедоступной информации. Как я могу поделиться вместе картинкой и текстом?

Мой код:

procedure TForm1.ShowShareSheetAction1BeforeExecute(Sender: TObject);
begin
  ShowShareSheetAction1.Bitmap.Assign( my_Bitmap_to_share ); // here I assigned prepared TBitmap to share
  ShowShareSheetAction1.TextMessage := 'Here I assigned text to share';
end;

procedure TForm1.ButtonShareClick(Sender: TObject);
begin
  ShowShareSheetAction1.Execute; // my my_Bitmap_to_share gets shared, but my text is not.... why???
end;
...