Schnappschuss von Video

[fLaSh11]

Hallo DPler,

ich lasse das Video (welches mir meine WebCam liefert) auf einer Panel anzeigen. Nun möchte ich von diesem Video einen Schnappschuss machen. D.h. ein Bild herauspicken
Ich zerbreche mir schon den ganzen Tag den Kopf darüber und hab ewig gesucht...

Vielen Dank für Hilfe.

MfG
Steffen

[Flips]

Wohl nicht lang genug gesucht
Hier stehts
Wenn du mit Geduld nach Webcam suchst, dann findest du auch was

[fLaSh11]

Dein Code bringt eine AV bei mir. Aber ich hab jetzt grad auch ne Lösung gefunden.
Einfach ein Screenshot vom Desktop machen und die Panel angeben.

Delphi-Quellcode:

procedure TForm1.MakeSnapShot(const Target: TBitmap);
var
  DesktopDC: HDC;
begin
  DesktopDC := CreateDC('DISPLAY', nil, nil, nil);
  try
    Target.PixelFormat := pfDevice;
    Target.Width := Panel1.Width;
    Target.Height := Panel1.Height;

    BitBlt(Target.Canvas.Handle, -Form1.Left - Panel1.Left, -Form1.Top - Panel1.Top -20, Screen.Width, Screen.Height, DesktopDC, 0, 0, SRCCOPY);
  finally
    DeleteDC(DesktopDC);
  end;
end;

[SirThornberry]

von der Screenshot-Variante würde ich abraten. Wenn das Video in einem Modus läuft wo direkt in den Videospeicher geschrieben wird, siehst du auf dem Screenshot dann nichts.

[fLaSh11]

Oder es von einem anderen Fenster überdeckt wird

[Flips]

Zitat von fLaSh11:

Dein Code bringt eine AV bei mir. Aber ich hab jetzt grad auch ne Lösung gefunden.
Einfach ein Screenshot vom Desktop machen und die Panel angeben.

Würd ich allein wegen der Umständlichkeit davon abraten, ohne auf die technischen Probleme einzugehen...
Bei mir funzt es via Clipboard, haste alles richtig angepasst?
Denk an das Pixelformat, anders kanns nicht gehen.
Hier im Anhang hab ich noch eine weitere Methode implementiert, über capFileSaveDIB.
Da sollte jetzt was dabei sein

[fLaSh11]

Es ist ja logisch, dass eine AV kommt, denn ich benutze die Kamera für das anzeigen des Videos, da kann sie ja nicht gleichzeitig noch ein Foto schießen. Deshalb dachte ich, ich extrahiere ein Frame aus dem Video...

[Flips]

Nein du verstehst das falsch. Das funktioniert schon, ich capture ja auch während ich ein Foto damit mache. Funktioniert der Code den ich hochgeladen hab bei dir nicht?

[fLaSh11]

Ah, vielen Dank! Das funktioniert.