[ERLEDIGT] Problem bei Bildspeichern und USB Kamera

[matashen]

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

Delphi-Quellcode:

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

[mkinzler]

Delphi-Quellcode:

if video.DetectMotion>10 then begin;

ist schon einmal ein Strichpunkt zu viel!