AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Webcam in Delphi?

Offene Frage von "himitsu"
Ein Thema von Nicolai1234 · begonnen am 10. Dez 2004 · letzter Beitrag vom 8. Apr 2021
Antwort Antwort
grips-net

Registriert seit: 3. Sep 2004
Ort: St. Wendel
50 Beiträge
 
#1

Re: Webcam in Delphi?

  Alt 13. Okt 2006, 12:51
Wollt mich nur kurz für den guten Atikel und die wunderbaren Antworten bedanken. Hatte das gleiche Problem, hab die Lösungen ausprobiert und alles hat auf Anhieb funktioniert.


Schöne Grüße aus dem Saarland.


Michael
  Mit Zitat antworten Zitat
Erutan

Registriert seit: 16. Mär 2013
71 Beiträge
 
Delphi 7 Professional
 
#2

AW: Webcam in Delphi?

  Alt 6. Feb 2014, 15:56
Boahhh, vielen herzlichen Dank für die Anleitung. Ich hatte eigetich gar nicht vorgehabt, meine Webcam anzusteuern aber als ich das Posting sah, konnte ich gar nicht anders

Das hat auf Anhieb geklappt.

Nur eines klappt nicht...zumindest bei mir nicht: Wenn ich das Fenster schließe, werden irgendwelche Treiber wohl nicht entladen, denn wenn ich das Programm dann erneut starte, blendet mir Windows ne Kameraauswahl ein (dabei habe ich nur eine ) und egal ob ich die wähle oder nicht....das Bild bleibt schwarz und das Licht der Cam auch.

Erst nach Neustart des Rechners geht es wieder.

Irgendwie müßte man den Start der Cam sauber beenden können.

Viele Grüße
Holger
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.352 Beiträge
 
Delphi 12 Athens
 
#3

AW: Webcam in Delphi?

  Alt 6. Feb 2014, 17:10
Ich hab eigentlich nicht solche Probleme. (allerdings hab ich mir das selber implementiert)

Hab mir jetzt nicht alles angesehn, aber wird das am Ende auch alles sauber geschlossen?
Bei mir sieht das so aus:
Delphi-Quellcode:
//FCaptureWindow := capCreateCaptureWindow(.....


SendMessageE(FCaptureWindow, WM_CAP_SET_PREVIEW, WPARAM(False), 0, 'WM_CAP_SET_PREVIEW');
SendMessageE(FCaptureWindow, WM_CAP_SET_CALLBACK_ERROR, 0, LPARAM(nil), 'WM_CAP_SET_CALLBACK_ERROR');
SendMessageE(FCaptureWindow, WM_CAP_DRIVER_DISCONNECT, 0, 0, 'WM_CAP_DRIVER_DISCONNECT');
DestroyWindow(FCaptureWindow);
FCaptureWindow := 0;
[add]
MSDN-Library durchsuchenSendMessage statt dem SendMessageE (bei mir ist dort noch die Fehlerbehandlung mit drin, welche man natürlich nie vergessen sollte )
Ein Therapeut entspricht 1024 Gigapeut.

Geändert von himitsu ( 6. Feb 2014 um 17:14 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Sinspin
Sinspin

Registriert seit: 15. Sep 2008
Ort: Dubai
711 Beiträge
 
Delphi 10.3 Rio
 
#4

AW: Webcam in Delphi?

  Alt 31. Mär 2021, 12:33
So einfach wie es ist, es funktioniert noch immer.

Leider nicht unter Remote Desktop. Da bleibt das Bild einfach Schwarz.

Die Windows eigene "Camera" App funktioniert hingegen. Träge, aber geht!

Hat schonmal jemand eine Webcam in einer Remote Desktop Session zum laufen bekommen?

Danke im vorraus für eure Hilfe.
Stefan
Nur die Besten sterben jung
A constant is a constant until it change.
  Mit Zitat antworten Zitat
Redeemer

Registriert seit: 19. Jan 2009
Ort: Kirchlinteln (LK Verden)
1.117 Beiträge
 
Delphi 2009 Professional
 
#5

AW: Webcam in Delphi?

  Alt 31. Mär 2021, 15:16
Schon mal PasLibVlc probiert? Kann man ja mal mit VLC testen.
Janni
2005 PE, 2009 PA, XE2 PA
  Mit Zitat antworten Zitat
Benutzerbild von Sinspin
Sinspin

Registriert seit: 15. Sep 2008
Ort: Dubai
711 Beiträge
 
Delphi 10.3 Rio
 
#6

AW: Webcam in Delphi?

  Alt 31. Mär 2021, 19:08
Danke, das nenne ich mal was gelernt

Lokal klappt es. In der RDP Session nicht.
Wenngleich man im VLC Debug-log schön sehen kann das das Herstellen der Verbindung soweit klappt, dann aber eine relativ nichtssagende Fehlermeldung kommt.
Code:
...
dshow debug: CaptureFilter::EnumPins
dshow debug: CapturePin::QueryDirection
dshow debug: CapturePin::ConnectedTo [not connected]
dshow debug: CapturePin::QueryPinInfo
dshow debug: CaptureFilter::QueryFilterInfo
dshow debug: CapturePin::QueryPinInfo
dshow debug: CaptureFilter::EnumPins
dshow debug: CapturePin::QueryDirection
dshow debug: CapturePin::QueryDirection
dshow debug: CapturePin::QueryAccept [OK] (width=1280, height=960, chroma=YUY2, fps=30.000030)
dshow debug: CapturePin::ReceiveConnection [OK]
dshow debug: CapturePin::NotifyAllocator
dshow debug: ConnectFilters: graph_builder2 available.
dshow warning: ConnectFilters: No crossBar routes found (incompatible pin types)
dshow debug: filters connected successfully !
dshow debug: MEDIATYPE_Video
dshow debug: selected video pin accepts format: YUY2
dshow debug: skipping audio device
dshow debug: Playing...
dshow debug: CapturePin::QueryPinInfo
dshow debug: CaptureFilter::EnumPins
dshow debug: CapturePin::QueryDirection
dshow debug: CaptureFilter::EnumPins
dshow debug: CapturePin::QueryDirection
dshow debug: CapturePin::QueryPinInfo
dshow debug: CaptureFilter::EnumPins
dshow debug: CapturePin::QueryDirection
dshow debug: CaptureFilter::EnumPins
dshow debug: CapturePin::QueryDirection
dshow debug: CapturePin::ConnectedTo [OK]
dshow debug: CaptureFilter::SetSyncSource
dshow error: Failed to run graph. Capture device may be in use.
Stefan
Nur die Besten sterben jung
A constant is a constant until it change.
  Mit Zitat antworten Zitat
Redeemer

Registriert seit: 19. Jan 2009
Ort: Kirchlinteln (LK Verden)
1.117 Beiträge
 
Delphi 2009 Professional
 
#7

AW: Webcam in Delphi?

  Alt 31. Mär 2021, 22:00
Das ist derselbe User, oder? Betriebssystem Windows 10? Webcam-Datenschutz konfiguriert?

Ansonsten bin ich überfragt. Ich möchte das jetzt nicht bei uns in der Produktionsumgebung testen, wo eine PasLibVlc-Anwendung läuft. Ich meine aber (bin mir aber nicht sicher), unser Sysadmin hatte über RDP überprüft, dass meine Software mit der Sicherheitssoftware funktioniert. (Hintergrund, vermutlich irrelevant: Manche Webcams werden als Videogerät (Kamera) erkannt, andere als MTP. Da auch als Massenspeicher nutzbare Handys und Fotoapparate unter MTP fallen und nicht unterschiedbar sind, ist die MTP-Klasse in Enterprise-Umgebungen oft gesperrt. Wir hatten vorher eine Software der Bremer Firma The Imaging Source und professionelle Industriekameras von denen. Das sind zwar USB-Geräte (3.0 only), aber nicht mal ansatzweise Plug-and-Play-fähig, weshalb es Probleme nach Wechsel der Sicherheitssoftware gab. Wir haben das System dann durch billige Logitech C920 und eine schnell zusammengeschusterte Software ersetzt, um Zuverlässigkeit, Stabilität und Bildqualität erheblich zu verbessern.)
Janni
2005 PE, 2009 PA, XE2 PA
  Mit Zitat antworten Zitat
Antwort Antwort

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:06 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz