Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Cep telefonundan resim yakalama esnasında onay sorusu
#1
İyi günler.
Forma 1 adet 
ActionList1 koydum action List Editor listesinden 
TakePhotoFromCameraAction1 sectim.
TakePhotoFromCameraAction1 events sekmesinden 
DoDidFinish  olayına
procedure TFrm_okuma.DoDidFinish(Image: TBitmap);
begin
 resim.Bitmap.Assign(Image);
end;
resmi form daki Image  componentine ekliyorum.

Herşey  ilk Anroid için denemeleri için süper çalışıyor.

Sıkıntım

Take (resim Çek) olayında

Önce cep telefonunu resim çekme programı açılıyor resim çekildiği anda 
Casper M3 telefonda OK/Cancel  Samsung  S5 mini Telefonda Tamam Vazgeç  onayından sonra 
DoDidFinish  olayına geçiyor.
Cep telefonunda resim çekerken bu soru gelmiyor.

Bu soruyu nasıl atlarım.
"…De ki: "Hiç bilenlerle bilmeyenler bir olur mu? Şüphesiz, temiz akıl sahipleri öğüt alıp-düşünürler" (Zümer Suresi, 9)
Cevapla
#2
Merhaba.

- Sizin için Embarcadero'nun "Mobile Tutorials" PDF dokümanına baktım. PDF için bu linkten faydalanabilirsiniz.

- Sayfa 231'de der ki, 
Alıntı:Saving a Picture to the Device Photo Library If you want your application to automatically save the pictures taken by a device camera to the device Photo Library, set the NeedSaveToAlbum field of the second parameter of the TakePhoto method to True

- NeedSaveToAlbum parametresini TRUE yapmalıymışsınız. Ben denemedim. Sonucu bildirirseniz bu başlığı okuyan herkes faydalanır.
var
  Service : IFMXCameraService;
  Params  : TParamsPhotoQuery;
begin
 if TPlatformServices.Current.SupportsPlatformService(IFMXCameraService, Service) then
 begin
   Params.Editable           := True;
   Params.NeedSaveToAlbum    := True;
   Params.RequiredResolution := TSize.Create(640, 640);
   Params.OnDidFinishTaking  := DoDidFinish;
   Service.TakePhoto(SpeedButton1, Params);
 end
 else
   ShowMessage('This device does not support the camera service');
 end;
end;
Saygılarımla
Muharrem ARMAN

guplouajuixjzfm15eqb.gif


Cevapla
#3
(06-02-2019, Saat: 20:40)mrmarman Adlı Kullanıcıdan Alıntı: Merhaba.

- Sizin için Embarcadero'nun "Mobile Tutorials" PDF dokümanına baktım. PDF için bu linkten faydalanabilirsiniz.

- Sayfa 231'de der ki, 
Alıntı:Saving a Picture to the Device Photo Library If you want your application to automatically save the pictures taken by a device camera to the device Photo Library, set the NeedSaveToAlbum field of the second parameter of the TakePhoto method to True

- NeedSaveToAlbum parametresini TRUE yapmalıymışsınız. Ben denemedim. Sonucu bildirirseniz bu başlığı okuyan herkes faydalanır.
var
  Service : IFMXCameraService;
  Params  : TParamsPhotoQuery;
begin
 if TPlatformServices.Current.SupportsPlatformService(IFMXCameraService, Service) then
 begin
   Params.Editable           := True;
   Params.NeedSaveToAlbum    := True;
   Params.RequiredResolution := TSize.Create(640, 640);
   Params.OnDidFinishTaking  := DoDidFinish;
   Service.TakePhoto(SpeedButton1, Params);
 end
 else
   ShowMessage('This device does not support the camera service');
 end;
end;

Hocam cevabınız için teşekkür ederim.
resimlerde göründüğü gibi denedim ama fark olmadı
ilk sizin gönderdiğiniz şekilde embarcadore nin help de bulunan örnekle yapmıştım netice alamadım.
Derlerken Build All Project derliyorum  
Saygılarımla


Ek Dosyalar Resimler
   
"…De ki: "Hiç bilenlerle bilmeyenler bir olur mu? Şüphesiz, temiz akıl sahipleri öğüt alıp-düşünürler" (Zümer Suresi, 9)
Cevapla
#4
Teşekkürler ben de öğrenmiş oldum.
Saygılarımla
Muharrem ARMAN

guplouajuixjzfm15eqb.gif


Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  OrangeUI SkinFMXDBGrid Satırlara Resim Ekleme Hk. pro_imaj 11 1.168 02-04-2020, Saat: 20:54
Son Yorum: pro_imaj
  Android Imagelist e resim ekleme,TBitmap 41linea41 2 390 01-03-2020, Saat: 00:55
Son Yorum: Fesih ARSLAN
  gelen çağrıyı yakalama erdogan 8 1.060 16-02-2020, Saat: 19:22
Son Yorum: erdogan
  listview resim çekme theercan 0 479 29-07-2019, Saat: 10:48
Son Yorum: theercan
  Resim Ortlama Problemi zihnidede 5 1.228 03-05-2019, Saat: 16:30
Son Yorum: Fesih ARSLAN



Konuyu Okuyanlar: 1 Ziyaretçi