APP中的分享功能

1、在Form中加入3个按钮，分别为拍照、分享到社交圈、分享信息，并设置图标；

2、加入ActionList，双击后，选择加入Stadard中2个ShowShareSheetAction和TakePhotoFromCameraAction，分别控制分享和拍照的动作；

3、加入Image组件，用于拍照存放图片区；

4、拍照按钮的Action设为TakePhotoFromCameraAction，点击TakePhotoFromCameraAction，找到Events中DidFinishTaking事件，写入代码：

void __fastcall TForm1::TakePhotoFromCameraAction1DidFinishTaking(TBitmap *Image)

{

 this->Image1->Bitmap->Assign(Image);

}

5、分享照片的按钮的Action设为ShowShareSheetAction1，点击ShowShareSheetAction1，找到Events中BeforeExecute事件，写入代码：

void __fastcall TForm1::ShowShareSheetAction1BeforeExecute(TObject *Sender)

{

 this->ShowShareSheetAction1->Bitmap->Assign(this->Image1->Bitmap);

}

6、在手机上运行，效果如图：点击分享后，能有多个选项可供选择。