Tüm Platformlar için Hızlı Uygulama Geliştirme Kitap Yayın Süreci
Kitap gözden geçirilmek üzere BTG (Bilgi ve Teknoloji Grubu) 'na gönderildi. 05.10.2018-14:10
BTG (Bilgi ve Teknoloji Grubu) tarafından iki sayfalık bir reklam tasarımı bekleniyor. 08.10.2018 - 15:30
Kitap basım talebi değerlendirilmek üzere matbaaya bildirildi. Matbaadan basım süreci hakkında bilgi bekleniyor. 15.10.2018 - 15:34
Kitap 1.000 adet basım talebi ile matbaaya gönderildi. 16.10.2018 - 16:50

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
TCamera Component Çalışmıyor
#1
Merhaba;
Basit bir örnek üzerinden sorunu anlatmk istiyorum;

Forma 2 adet button ve 1 adet Tcamera componenti ile 1 adet Timage nesnesi ekliyorum.

Button 1 Camerayı aç
procedure TForm1.btnTrueClick(Sender: TObject);
begin
 CameraComponent.Active := True;
end;

Button 2 kameradaki son görüntüyü al kamerayı kapat
procedure TForm1.btnFalseClick(Sender: TObject);
begin
CameraComponent.Active := False;
//Image1.Bitmap.Assign(imgCameraView.Bitmap);
end;

Camera Component image nesnesine son rersmi yaz.
procedure TForm1.CameraComponentSampleBufferReady(Sender: TObject;
 const ATime: TMediaTime);
begin
 TThread.Synchronize(TThread.CurrentThread, GetImage);
end;
Yukarıdaki kod birçok platformda sorunsuz çalışıyorken
Windows 10 mini tablette çalışmıyor ve hatada vermiyor.
Normalde button1 basıldığında kamerada görüntü image nesnesine gelmesi gerekirkn gelmiyor fakat kameranın ışığı .çalıştığını gösteriyor (yanıyor)
ikinci button ile kameradaki veriyi al dedimde program kilitleniyor yine hata mesajı yok.

Bu konuyu nasıl çözebilirim.

*Windowsun kendi kamera uygulamasında kameranın çalıştığını gözlemliyorum.

Teşekkürler.
Cevapla
#2
Merhaba,
Yalnızca Windows 10 için Thread olmadan deneyebilir misiniz?
While true do; Hayat döngüsü, kısır değildir! Yapılan bir yanlış, o döngünün dışına çıkmanızı sağlayacaktır.
WWW
Cevapla
#3
(10-02-2018, Saat: 13:20)Fesih ARSLAN Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlMerhaba,
Yalnızca Windows 10 için Thread olmadan deneyebilir misiniz?

Merhaba Fesih Hocam;

Dediğiniz şekilde denedim sonuç yine aynı;

Aslında sorun aşağıdaki şekilde işlem yaptığımda image nesnesine görüntünün gelmemesi sizin bahsettiğiniz kısım görüntü geldikten sonra görüntüyü resim olarak image nesnesine gelmesi.

procedure TForm1.CameraComponentSampleBufferReady(Sender: TObject;
  const ATime: TMediaTime);
begin
  CameraComponent.SampleBufferToBitmap(imgCameraView.Bitmap, True);
end;

*Dosya ektedir.


Ek Dosyalar
.zip   kamera.zip (Dosya Boyutu: 54,57 KB / İndirme Sayısı: 10)
Cevapla
#4
qGbYod.pngÇözümü değil ama sorunu buldum sanırım.
Buraya bizim exe yi nasıl ekleyebiliriz bilgisi olan var mı acaba.

Teşekkürler.
Cevapla
#5
Merhaba, Mircrosoftta şöyle bir bilgi var. Sanırım sizdeki sorunda bu olabilir.


Alıntı:"Kamerayı her uygulama için kapatsanız bile kullanabilecek uygulamaları seçin'in belirtilen uygulamalardan bazıları yine fotoğraf veya video çekmenizi sağlamak için kamerayı açabilir. Ancak kamera, fotoğraf veya videoyu siz Fotoğraf veya Video düğmesini açıkça seçmediğiniz sürece çekemez.

Windows Hello'yu açarsanız Uygulamalarımın kameramın donanımını kullanmasına izin ver kapalı olduğunda bile kameranızı kullanır. Windows Hello kapalıysa kameranıza erişemez. (Windows 10'un parçası olan Windows Hello cihazlarınızda, uygulamalarınızda, çevrimiçi hizmetlerde ve ağlarda oturum açmak için yeni bir yöntemdir.) "

 Şurayı bir kontrol edin windows 10 ayarlar kısmına gidin. Burada uygulamalar ve özellikleri var bunu seçip içerisinde kameralar yazanı bulun. Bulduğunuzda üzerine tıklayarak seçin hemen altında Gelişmiş seçenekler yazar burayı bir kontrol edin. Buradaki ayarlar belki sorununuza yardımcı olabilir.

gOqX9Q.png



Birde şöyle bir şey söylemişler 
  • Kamerayı diğer uygulamalar içinden kullanmak istiyorsanız Başlangıç  düğmesini seçin, Ayarlar  > Gizlilik > Kameraöğesini seçin ve ardından Uygulamaların kameramı kullanmasına izin ver seçeneğini etkinleştirin.

Cevapla
#6
Merhaba cevabınız için teşekkür ederim @Lord_Ares

Bahsettiğiniz yeride kontrol ettim sonuç olumsuz.

Şöyle bir imkanım oldu;
Bir tane Windows 10 LapTop edindim aynı exe yi aynı ayarlarda denediğimde sorunsuz çalıştığını gözlemliyorum.

Mini tablet tarfında;
İşin garip tarafı bir hata mesajı oluşmuyor Kameranın ışığı sanki görüntü geliyor gibi yanıyor fakat program kilitlenmiş durumda. Bitmap tipiyle ilgili bir sorun olduğunu düşünüyorum. Kameradan gelen görüntüyü başka hangi bileşenlere bitmap dışında aktarabilirim acaba.

Teşekkürler.
Cevapla
#7
Bileşene aktarmadan direk bir klasöre kaydedip sonucu gözlemleyin bakalım ne olacak.
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Camera Component Programı Kilitliyor. pro_imaj 20 378 05-10-2018, Saat: 18:48
Son Yorum: pro_imaj
  Embarcadero sensör örnekleri çalışmıyor 10.Köy 11 470 29-09-2018, Saat: 22:15
Son Yorum: 10.Köy
Question component kurulumu Mr.Developer 4 348 04-02-2018, Saat: 18:25
Son Yorum: Mr.Developer
  Android Cihazda Debug Çalışmıyor nehirnnn 13 1.686 20-10-2017, Saat: 13:01
Son Yorum: nehirnnn
  Windows tarafında ComboBox Scroll Çalışmıyor pro_imaj 6 697 22-09-2017, Saat: 22:26
Son Yorum: pro_imaj



Konuyu Okuyanlar: 1 Ziyaretçi