Sorry for asking this kind of question because I’m still new with the Delphi XE6 and Firemonkey environment.. I want to make a camera app that can takes picture, share and delete it.. This is how it supposed to works.. We click the capture button, then it will capture the image and display it to Timage tool.. What I’ve done so far is when it displayed on the TImage tool, it already saved on the phone’s gallery.. Then I want to delete the image on the gallery when I click the delete button, but it only remove the image on the TImage tool.. What should I do then?
Here is my code:
//delete image(only from the TImage tool but still exists in gallery)
procedure TForm1.btn_deleteClick(Sender: TObject);
begin
Image1.Bitmap.SetSize(0,0);
end;
//share image
procedure TForm1.ShowShareSheetAction1BeforeExecute(Sender: TObject);
begin
ShowShareSheetAction1.Bitmap.Assign(Image1.Bitmap);
end;
//capture image from camera
procedure TForm1.TakePhotoFromCameraAction1DidFinishTaking(Image: TBitmap);
begin
Image1.Bitmap.Assign(Image);
end;
