AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi Webcam Bild (JPG) per FTP-Uploaden
Thema durchsuchen
Ansicht
Themen-Optionen

Webcam Bild (JPG) per FTP-Uploaden

Ein Thema von internetnavigator · begonnen am 10. Aug 2007 · letzter Beitrag vom 6. Okt 2007
Antwort Antwort
Seite 4 von 5   « Erste     234 5      
internetnavigator

Registriert seit: 13. Mai 2006
94 Beiträge
 
RAD-Studio 2010 Arc
 
#31

Re: Webcam Bild (JPG) per FTP-Uploaden

  Alt 14. Aug 2007, 16:17
Nein, erst nach einigen Aufrufen... bzw. jetzt garnicht mehr... (s.o.)

Aber wenn ich jetzt auf dem Server Netrender (Cinema 4D) (Maximiert) öffne, dann macht das Programm keine Bilder mehr wie kann ich das ändern?
  Mit Zitat antworten Zitat
internetnavigator

Registriert seit: 13. Mai 2006
94 Beiträge
 
RAD-Studio 2010 Arc
 
#32

Re: Webcam Bild (JPG) per FTP-Uploaden

  Alt 15. Aug 2007, 17:30
Es soll doch nur IMMER active sein... Bitteeeee
  Mit Zitat antworten Zitat
internetnavigator

Registriert seit: 13. Mai 2006
94 Beiträge
 
RAD-Studio 2010 Arc
 
#33

Re: Webcam Bild (JPG) per FTP-Uploaden

  Alt 25. Aug 2007, 00:26
bitte!! ich brauche nur den code, damit das Programm auch bei maximierten Fenstern, wenn es nicht im Vordergrund ist, weiterläuft. BITTE!

mfg
  Mit Zitat antworten Zitat
internetnavigator

Registriert seit: 13. Mai 2006
94 Beiträge
 
RAD-Studio 2010 Arc
 
#34

Re: Webcam Bild (JPG) per FTP-Uploaden

  Alt 25. Aug 2007, 09:07
Hallo mal wieder Ich denke schon ich führe Selbstgespräche hier
Bei der Methode, wie ich das Bitmap (JPG) jetzt in Image1.Picture.Bitmap bekomme ist ja leider immer die Zwischenablage nicht zu verwenden. Kann ich das Bild irgendwie mit einem Stream "transportieren"?

Hier mal der entscheidende Code
Delphi-Quellcode:
  SendMessage(camhandle, WM_CAP_EDIT_COPY, 1, 0 ); //Bild in Zwischenablage legen
  Image1.Picture.Bitmap.LoadFromClipboardFormat(cf_BitMap,ClipBoard.GetAsHandle(cf_Bitmap),0); //Bild aus Zwischenablage holen und in Image1 "packen"
ich hoffe ihr wisst, was ich meine...


mfg i-n
  Mit Zitat antworten Zitat
internetnavigator

Registriert seit: 13. Mai 2006
94 Beiträge
 
RAD-Studio 2010 Arc
 
#35

Re: Webcam Bild (JPG) per FTP-Uploaden

  Alt 27. Aug 2007, 19:41
Niemand 'ne Ahnung von Bitmap.Streams?

Ach kommt bitte!
  Mit Zitat antworten Zitat
Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#36

Re: Webcam Bild (JPG) per FTP-Uploaden

  Alt 27. Aug 2007, 20:26
Lass den Leuten doch auch mal Zeit. Alle 24 Stunden zu pushen reicht locker.

Noch was:
Zitat:
#33|Beitrag Verfasst am: 25.08.2007, 00:26
Zitat:
#34|Beitrag Verfasst am: 25.08.2007, 09:07
wann schläfst du eigentlich?
  Mit Zitat antworten Zitat
internetnavigator

Registriert seit: 13. Mai 2006
94 Beiträge
 
RAD-Studio 2010 Arc
 
#37

Re: Webcam Bild (JPG) per FTP-Uploaden

  Alt 27. Aug 2007, 20:51
Zitat von NamenLozer:

Noch was:
Zitat:
#33|Beitrag Verfasst am: 25.08.2007, 00:26
Zitat:
#34|Beitrag Verfasst am: 25.08.2007, 09:07
wann schläfst du eigentlich?
dazwischen Ne mal im Ernst: Es war Samstag In der Schulzeit kommt soetwas nicht vor - keine Sorge

Aber nett, dass du mich draufhinweist! -> Mir kam der Zeitabstand kleiner vor.
  Mit Zitat antworten Zitat
loetmann

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

Re: Webcam Bild (JPG) per FTP-Uploaden

  Alt 6. Sep 2007, 22:16
Zitat von internetnavigator:
bitte!! ich brauche nur den code, damit das Programm auch bei maximierten Fenstern, wenn es nicht im Vordergrund ist, weiterläuft. BITTE!
mfg

SendMessage(ghCapWnd, WM_CAP_GRAB_FRAME_NOSTOP, 1, 0); //weitergrabben wenn Anwendung minimiert oder verdeckt ist

Delphi-Quellcode:
  

//das im Timer aufrufen
...
capSetCallbackOnFrame(ghCapWnd, integer(@FrameCallbackFunction));
...


uses VideoCap, avicap, VideoMci;

//grabben über callback fuction
function FrameCallbackFunction(AHandle : hWnd; VIDEOHDR : TVideoHDRPtr): bool; stdcall;
begin
 result := true;
  // da diese Callback-Funktion sonst bei jedem Preview-Frame ganz durchlaufen werden würde:
  // jetzt nur noch mehr dann, wenn draußen GrabFrameFlag auf TRUE gesetzt wurde PLUS, für die
  // Hintergrundlaufbarkeit: SendMessage(ghCapWnd, WM_CAP_GRAB_FRAME_NOSTOP, 1, 0);

  if GrabFrameFlag = false then exit;
  GrabFrameFlag := false;

  SendMessage(ghCapWnd, WM_CAP_GRAB_FRAME_NOSTOP, 1, 0);

  //erzeuge Grundbildmaße
 with Form1 do
 begin
   with camBitmapInfo.bmiHeader do
   begin
    bild_anzeige.Width:=biWidth;
    bild_anzeige.Height:=biHeight;
    bild_original.Width:=biWidth;
    bild_original.Height:=biHeight;
    bild_old.Width:=biWidth;
    bild_old.Height:=biHeight;
    bild_anzeige.PixelFormat:=pf24bit; //truecolorBild
    bild_original.PixelFormat:=pf24bit; //truecolorBild
    bild_old.PixelFormat:= pf24bit;
   end;

  hCompatibleBitmap:=bild_original.Handle;
  //function sets the bits of color data for a bitmap to the specified values.
  SetBitmapBits(hCompatibleBitmap,VideoHDR^.dwBufferLength,VideoHDR^.lpData); //return= anzahl bytes
 
 //Bild jetzt in bild_original
 ...
 

 end;//form1
 GrabFrameFlag := true;
end;
  Mit Zitat antworten Zitat
internetnavigator

Registriert seit: 13. Mai 2006
94 Beiträge
 
RAD-Studio 2010 Arc
 
#39

Re: Webcam Bild (JPG) per FTP-Uploaden

  Alt 6. Sep 2007, 23:19
danke!
Ich werde mich die Tage mal damit beschäftigen, wenn ich Fragen habe, seit ihr die ersten, die es erfahren

Gruß i-n
  Mit Zitat antworten Zitat
internetnavigator

Registriert seit: 13. Mai 2006
94 Beiträge
 
RAD-Studio 2010 Arc
 
#40

Re: Webcam Bild (JPG) per FTP-Uploaden

  Alt 7. Sep 2007, 17:45
1. Woher bekomme ich die Componenten für "uses"?
2. Und: Wie kann ich jetzt das Bild (ohne Zwischenspeichern und Clipboard ) auf den FTP-Server bekommen?
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?
4. Und noch meine Letzte Frage: Wenn ich capSetCallbackOnFrame(ghCapWnd, integer(@FrameCallbackFunction)); aufrufe, was bekomme ich dann zurück, "bild_original"? Also direkt das TJPEG?

Ich weiss es sind viele Fragen, sorry
mfg i-n
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 4 von 5   « Erste     234 5      


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 05:08 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