merhaba, telefondan resim çekmek için paylaşılan bütün örneklerde TakePhotoFromCameraAction kullanılmış. Bu actionı kullandığımızda ekrana kamera uygulamasının kendine has çekme tuşu ve çektikten sonra kaydet tuşu geliyor. Bunları aşmak için action yerine button nesnesinin onclick eventinda kamerayı aç kapa yaptırarak imgCameraView üzerine resmi alıyorum. Buradan da bir image nesnesine alıyorum.Fakat bunu bir türlü galeriye kaydedemiyorum. Windows üzerinde denediğimde belgelerime kayıt ediyor ama telefonda denediğimde hiç bir tepki yok.
Kod: (Select All)
procedure TForm1.btnFalseClick(Sender: TObject);
begin
CameraComponent.Active := False;
Image1.Bitmap.Assign(imgCameraView.Bitmap);
self.imgCameraView.Bitmap.SaveToFile(System.IOUtils.TPath.GetPicturesPath + '/resimadi.jpg');
end;
procedure TForm1.btnTrueClick(Sender: TObject);
begin
CameraComponent.Active := True;
end;
procedure TForm1.CameraComponentSampleBufferReady(Sender: TObject;
const ATime: TMediaTime);
begin
CameraComponent.SampleBufferToBitmap(imgCameraView.Bitmap, True);
end;