Registriert seit: 13. Mai 2006
94 Beiträge
RAD-Studio 2010 Arc
|
Re: Webcam Bild (JPG) per FTP-Uploaden
11. Aug 2007, 12:25
Ich denke, ich weiss woran es liegen könnte:
Delphi-Quellcode:
begin
handle := capCreateCaptureWindow(' Video',ws_child+ws_visible, 0,
0, 640, 480, Panel1.Handle, 1);
SendMessage(handle, WM_CAP_DRIVER_CONNECT, 0, 0); //verbinden: das wir bei jedem Aufruf vom Timer (1sec) mit aufgerufen
Delphi-Quellcode:
SendMessage( handle, WM_CAP_SET_PREVIEWRATE, 30, 0); //setRate
sendMessage( handle, WM_CAP_SET_OVERLAY, 1, 0); //setOvl
SendMessage( handle, wm_cap_set_preview, 1, 0); //prev
SendMessage( handle, WM_CAP_EDIT_COPY, 1, 0 ); //save Bitmap -> Clipboard
Image1.Picture.Bitmap.LoadFromClipboardFormat(cf_BitMap,ClipBoard.GetAsHandle(cf_Bitmap),0); //Clipboard (Bitmap) -> Image1
//...
end;
Es könnte doch sein, wenn er sich zuoft Connected hat, dass er dann damit aufhört und dann auch den Rest (Bild in Image1 zeigen) nicht mehr ausführt.
Meine Frage: Wie kann ich das "Rote" nur einmal ausführen?
|
|
Zitat
|