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. Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız..

- 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ı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.Merhaba.

- Sizin için Embarcadero'nun "Mobile Tutorials" PDF dokümanına baktım. Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız..

- 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
  listview resim çekme theercan 0 101 29-07-2019, Saat: 10:48
Son Yorum: theercan
  Resim Ortlama Problemi zihnidede 5 406 03-05-2019, Saat: 16:30
Son Yorum: Fesih ARSLAN
  Insert ve Silme yakalama ahmetb 4 431 18-04-2019, Saat: 16:29
Son Yorum: wiseman
  Image nesnesinde resim olup olmadığın kontrolü 41linea41 5 499 17-03-2019, Saat: 15:11
Son Yorum: mrmarman
  Resim Boyutunu Küçültme narkotik 4 795 12-12-2018, Saat: 22:11
Son Yorum: narkotik



Konuyu Okuyanlar: 1 Ziyaretçi