Как поделиться изображением и текстом вместе в Delphi 10.3.3 в приложении для Android

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;

0 ответов

Другие вопросы по тегам