AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi [ERLEDIGT] Problem bei Bildspeichern und USB Kamera
Thema durchsuchen
Ansicht
Themen-Optionen

[ERLEDIGT] Problem bei Bildspeichern und USB Kamera

Ein Thema von matashen · begonnen am 2. Jun 2014 · letzter Beitrag vom 2. Jun 2014
Antwort Antwort
matashen

Registriert seit: 29. Jan 2007
Ort: daheim
460 Beiträge
 
Delphi XE2 Enterprise
 
#1

[ERLEDIGT] Problem bei Bildspeichern und USB Kamera

  Alt 2. Jun 2014, 15:38
OK, habs selber noch rausgefunden. Der Speicherort ist ein zusätzlicher Datenträger auf dem die Bilder weggeschrieben werden sollen, der hat ne Macke. Ausgetauscht - alles funtzt. Scheiß USB-Sticks dafür müht man sich ab. Wie peinlich.

Hallo zusammen,

ich habe hier eine USB Kamera vom Typ DinoLite (also keine PopelUSBirgendwas sondern schon was höherwertiges). Dabei ein nettes SDK mit allmöglichen Tutorials zum Zugriff auf die Kamera, nur leider für Delphi ist nichts dabei. Dafür eine dll die für VB zugeschnitten ist (nerv).

So ich habs nun mittlerweile geschafft die Kamera zu steuern, und auch das Bild auf ein TImage zu zeigen. Live-Preview mach ich in einer Scrollbox.
Ich hol mir bei Bedarf das Bild direkt von der Kamera, bzw. das Handle.

Dann möcht ich das Bild gerne speichern, dabei wird aber nur ca. bei PNG 1/3 bei JPG=0 Byte und bei BMP auch 0 Byte abgelegt. Mach ich da was falsch?

jetzt noch ein bischen CODE

so hol ich das Bild ab, das Handle muss ich vorher freigeben sonst krachts beim nächsten Bild. (anders möglich?)
Bild wird nur abgeholt wenn es sich ändert. Die Kamera(oder die dll) hat eine eigene Bewegungserkennung die ich abfragen kann
Delphi-Quellcode:
if video.DetectMotion>10 then begin;
    image2.Picture.Bitmap.ReleaseHandle;
    image2.Picture.Bitmap.Handle:=video.GetFrameAsHBITMAP;
end;
so und dann möcht ich das Bild speichern was leider nicht funktioniert
image2.picture.bitmap.savetofile('PIC\'+afilename+'.BMP'); Ich hoffe jemand von euch hat eine Idee warum mein Bild nicht auf die Platte kommt.

Gruß Matthias
Matthias
Das Leben ist eines der härtesten.

Geändert von matashen ( 2. Jun 2014 um 16:02 Uhr) Grund: hat sich erledigt.
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.851 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: Problem bei Bildspeichern und USB Kamera

  Alt 2. Jun 2014, 16:00
if video.DetectMotion>10 then begin; ist schon einmal ein Strichpunkt zu viel!
Markus Kinzler
  Mit Zitat antworten Zitat
Antwort Antwort


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 12:17 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz