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;