Python daki Kodu Delphi ile Kullanmak

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
slyvestr
Üye
Mesajlar: 8
Kayıt: 03 Oca 2009 09:19

Python daki Kodu Delphi ile Kullanmak

Mesaj gönderen slyvestr »

S.a arkadaşlar

Python da yazılımış bir ip kamera oynatma kodunu PythonEngine componenti ile Delphide kullanabiliyorum. Fakat ornek.py dosyasını import edince konsol olarak bir pencere içinde videoyu açıyor. Bunu direkt image nesnesinde oynatmak için nasıl bir yol izlemek gerekir.

Pythonda cv2.imshow("Başlık", frame40) fonskiyonu ile çalışıyor haliyle bunu ayrı bir pencerede açıyor bunu stream ile delphiye alabilirmiyiz.
Teşekkürler.
ertank
Kıdemli Üye
Mesajlar: 1651
Kayıt: 12 Eyl 2015 12:45

Re: Python daki Kodu Delphi ile Kullanmak

Mesaj gönderen ertank »

Merhaba,

Kullandığınız Delphi sürümünü bildirmemişsiniz. Aşağıda anlatılanlar Delphi 10.3.1 ile çalışmaktadır.

Eğer sizin istediğiniz disk üzerinde veya benzer ortamda kayıtlı video dosyasını oynatmak ise lütfen aşağıdaki cevabı gözardı edin.

Eğer amacınız canlı anlık video kamera görüntüsünü göstermek ise; aşağıda sizin sorunuza cevap değil alternatif bir çözüm önerilmiştir.

Eğer yapmak istediğiniz IP kamera görüntüsünü göstermek ise bunu python kullanmadan yapabiliyor olmanız gerekli. Bilgim dahilinde IP kameraların tamamı RSTP destekler. Delphi ile ücretsiz "VLC Player" video izleme aracını kullanabilirsiniz. Kendi tasarladığınız form üzerine ücretsiz bileşen koyarak video gösterebilirsiniz.

1- Şu bağlantıdan en son desteklenen VLC kütüphanesini indirin. Şu an itibari ile 3.0.6 sürüm. https://prog.olsztyn.pl/paslibvlc/
2- Sisteminize yukarıdaki kütüphanenin desteklenen VLC PLayer sürümünü indirin
Win 64bit için 3.0.6 sürüm: https://nightlies.videolan.org/build/wi ... 0111-0511/
Win 32bit için 3.0.6 sürüm: https://nightlies.videolan.org/build/wi ... 0104-0308/
3- İndirdiğiniz kütüphane kodlarından uygun dpk dosyalarını derleyip Delphi bileşeni olarak ekleyin.
4- DemoPasLibVlcPlayer projesini açın. (Örnek projelerden DelphiXE10 için olan Delphi 10.3.1 ile değişikliğe gerek kalmadan çalışmaktadır)

Uygulama derlenip çalıştıktan sonra "MRL to play" alanına IP kamera RTSP bilgisini girin. IP numarası veya URL olabilir. Play butonuna tıkladığınızda bir süre iletişim kurulması için zaman geçecektir. Ardından video gösterimi başlar.

Bu şekilde hazırlayacağınız bir projede istediğiniz form üzerine TPasLibVlcPlayer bileşenini koyup gerekli birkaç satır kodu yazdıktan sonra istediğiniz şekilde video göstermeniz mümkün olacaktır.
Cevapla