Helligkeit eines Panels bzw. eines Webcam Livestreams ändern

[Larsi]

hi,
mit dem code webcam in delphi aus der code lib habe ich es hinbekommen, das aktuelle webcam bild in einem panel anzuzeigen. jetzt möchte ich entweder über die panel komponenten oder über den code aus der codelib die helligkeit die farbstufen und kontrast einstellen. wäre schon dankbar wenn man mir wenigstens eins von den punkten sagen könnte am wichtigsten wäre mir die helligkeit aber irgendwie auch die farbe
der code aus der code lib geht so:

Delphi-Quellcode:

//Zuerst brauchst du folgende Konstanten 
const 
  WM_CAP_DRIVER_CONNECT = WM_USER + 10; 
  WM_CAP_EDIT_COPY = WM_USER + 30; 
  WM_CAP_SET_PREVIEW = WM_USER + 50; 
  WM_CAP_SET_OVERLAY = WM_USER + 51; 
  WM_CAP_SET_PREVIEWRATE = WM_USER + 52; 

implementation 

{$R *.dfm} 

//Dann brauchst du noch das hier 
function capCreateCaptureWindow(lpszWindowName: LPCSTR; 
  dwStyle: DWORD; 
  x, y, 
  nWidth, 
  nHeight: integer; 
  hwndParent: HWND; 
  nID: integer): HWND; stdcall; 
  external 'AVICAP32.DLL' name 'capCreateCaptureWindowA'; 

procedure TForm1.LaberLaber; //halt irgendne Prozedur, ich habs im Formcreate, damit ich gleich was seh ^^ 
var handle:THandle; 
begin 
  handle := capCreateCaptureWindow('Video',ws_child+ws_visible, 0, 
  0, 320, 240, Panel1.Handle, 1); //Wie du siehst, brauchst du ein Panel in diesem Beispiel ;-) 
  SendMessage(handle, WM_CAP_DRIVER_CONNECT, 0, 0); 
  SendMessage(handle, WM_CAP_SET_PREVIEWRATE, 30, 0); 
  sendMessage(handle, WM_CAP_SET_OVERLAY, 1, 0); 
  SendMessage(handle, wm_cap_set_preview, 1, 0); 
end;

MFG Lars Wiltfang