Delphi Forum

Thread içerisinde, bağlantı için gerekli her nesneyi kendi içerisinde oluşturdum. Veri tabanı sorgulrını seri porttan veri geldikçe çelıştırıyorum. Bir thread çalışıyorsa sorun yok. Birden fazla thread yoğun bir şekilde çalışıyorsa sorun çıkıyordu.



fduman
"Thread çalışmaları yaparken aynı sorun ...

Merhabalar,
içinden bir türlü çıkamadığım bir sorunum var.

Seri porttan gelen bilgileri okuyup, ilgili bilgiyi veritabanında birtakım işlemlerle

sorgulayıp yine seri porttan göndermesi gereken bir program yazmaya çalışıyorum.

Veritabanı olarak firebird kullanıyorum.

Veritabanı sorgulanırken ...

Yukardaki kod butona bastığın anda mediaPlayer in karesini bmp formatında kaydeder.

Merhabalar,
Yukarıdaki kodla formun istediğim karesini alabiliyorum. Görüntüyü bir panel üzerinde gösteriyorum. Lakin görüntünün gösterildiği kısım siyah çıkıyor. Durdurup, alıp, tekrar çalıştırmayı denedim. Ama ...

Benzer birşeye ben de ihtiyaç duymuştum. Fazla zamanım olmadığı için şöyle bir çözüm bulmuştum.

Group footer bandın BeforePrint'inde kod yazıp,
Expression'ların değerlerini toplatıp,
Group footer bandın üzerindeki bir label nesnesine yazdırmıştım.

Yani QuickReport'a yaptırmak istediğim işi ...

TMediaPlayer nesnesinde yürütülmekte olan videonun o anki görüntüsünü, image olarak nasıl yakalanır.