Einzelnen Beitrag anzeigen

loetmann

Registriert seit: 22. Dez 2003
Ort: Rostock
33 Beiträge
 
Delphi 3 Standard
 
#41

Re: Webcam Bild (JPG) per FTP-Uploaden

  Alt 7. Sep 2007, 18:43
Zitat von internetnavigator:
1. Woher bekomme ich die Componenten für "uses"?
VideoCap, avicap, VideoMci muß Du mal googeln daher habe ich sie auch, das sind gesammelte Funktionen für Video, theoretisch brauchst Du die nicht, da Du den Code für das Abgreifen der Camera schon hast.

Zitat:
2. Und: Wie kann ich jetzt das Bild (ohne Zwischenspeichern und Clipboard ) auf den FTP-Server bekommen?
Indem Du eine Variabel:TBitmap definierst und dann dorst alles reinschmeißt

Zitat von internetnavigator:
3. Das Bild ist ja jetzt in "bild_original", oder? aber die (wenn es denn eine ist) Variable "bild_original" ist nirgends definiert. ist sie TJPEG?
Den Code hab ich aus meinem eingenen WebcamGrabber gezogen, ist daher unvollständig.
bild_original ist ein TBitmap. Er wird beim start des Programmes erzeugt:

Delphi-Quellcode:
initialization
  bild_original := TBitmap.Create;
  bild_original.Width:=800;
  bild_original.Height:=800;
  bild_original.PixelFormat:= pf24bit;
und am ende wieder freigegeben.


Zitat von internetnavigator:
4. Und noch meine Letzte Frage: Wenn ich [delphi]capSetCallbackOnFrame(ghCapWnd, integer(@FrameCallbackFunction));
aufrufe, was bekomme ich dann zurück, "bild_original"? Also direkt das TJPEG?
ein true oder false. Das Bild wird _in_ der Funktion geholt

[pre]
..
SendMessage(ghCapWnd, WM_CAP_GRAB_FRAME_NOSTOP, 1, 0);
..
hCompatibleBitmap:=bild_original.Handle;
//function sets the bits of color data for a bitmap to the specified values.
SetBitmapBits(hCompatibleBitmap,VideoHDR^.dwBuffer Length,VideoHDR^.lpData); //return= anzahl bytes
//Bild jetzt in Image1original
..
[/pre]

Wo bei Du aufpassen muß das das ein RGB Bild ist, von der Cam kann auch ein pf1bit, pf4bit, pf8bit, pf15bit, pf16bit, pf24bit, pf32bit Bild sein

Ein Gruß
  Mit Zitat antworten Zitat