Einzelnen Beitrag anzeigen

flossinger

Registriert seit: 22. Aug 2005
Ort: südlich der Alpen
109 Beiträge
 
Delphi 5 Standard
 
#5

Re: Remote Webcam - Das volle Programm

  Alt 30. Dez 2006, 22:24
Hallo,

zum Glück brauchst du da nicht lange zu suchen, das geht mit video capture und steht genau in der MSDN Library.

Hast du eine USB cam? Wenn die nicht angeschlossen ist, dann findest du keinen Treiber.

Die Treiber kannst du mit capgetdriverdescription ausfindig machen, in dem du den driverindex durchgehst.
Wenn du ohnehin nur eine cam hast, dann ist es noch einfacher:
Delphi-Quellcode:
driverindex:=0; // only first one working ie 0
capGetDriverDescription(driverindex,drvrname,80,drvrdescr,100);
   log(drvrname);
   log(drvrdescr);
Vollen Zugriff auf den Videostrem hast du mit der callback Funktion. Du musst definieren wie die heisst und dann den Videostream starten. In der call back aus kannst du auch deine Schnappschüsse zwischenspeichern und das Abspeichern, Verschicken, oder was auch immer veranlassen. Die zeitaufwändige Weiterverarbeitung selbst, sollte natürlich nicht in der callback selbst stattfinden. Ich finde, dass das der komfortabelste Weg ist, wenn du ohnehin streamst und es werkelt zuverlässig.
Delphi-Quellcode:
capSetCallbackOnVideoStream(capwinh,longint(@callbackvideostream));
capCaptureSequenceNoFile(capwinh);
grüsse,
der flossinger

edit: präzisiert, was in der callback geschieht und besser nicht geschieht.
  Mit Zitat antworten Zitat