Webcameinstellungen im Programm

[Chrissi91]

Hi ,

in meinem Programm wird die Webcam super angezeigt. Aber wie kann ich jetzt über einen Schieberegler Kontrast, Sättigung, Helligkeit, Belichtung, Empfindlichkeit, Weißabgleich einstellen? Ich wollte dafür allerdings nicht die Daten auf der Festplatte suchen und überschreiben lassen, sondern die Befehle direkt an die Kamera geben.

Wie gehe ich da ran, wenn es überhaupt geht, da ich in der DP nichts dazu gefunden habe.

[---Bernhard---]

Hi!

Unter Link findest du Beispielcodes wie man mit einer Webcam arbeiten kann.
Deine Angaben sind jedoch nicht sehr genau. Wenn du nicht sagst, wie du die Webcam genau anstuerest wird dir wohl keiner so leicht helfen können...

[Chrissi91]

der Thread hat mir auch nicht weitergeholfen.

Delphi-Quellcode:

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}

function capCreateCaptureWindow(lpszWindowName: LPCSTR;
 dwStyle: DWORD;
 x, y,
 nWidth,
 nHeight: integer;
 hwndParent: HWND;
 nID: integer): HWND; stdcall;
 external 'AVICAP32.DLL' name 'capCreateCaptureWindowA';

procedure TForm1.FormCreate;
var
 handle:THandle;
begin
 handle := capCreateCaptureWindow('Video',ws_child+ws_visible, 0,
 0, 320, 240, panel1.handle, 1);
 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;

[---Bernhard---]

Der von dir geposte Code ist auch nur da, damit das Bild angezeigt wird.
Weiter unten steht dann wie man die Einstellungen verändern kann!

Delphi-Quellcode:

const 
  WM_CAP_DLG_VIDEOFORMAT          = WM_USER+41;   //Formatauswahl
  WM_CAP_DLG_VIDEOSOURCE          = WM_USER+42;   //Einstellungen
  WM_CAP_DLG_VIDEOCOMPRESSION     = WM_USER+46;   //Kompression
begin
  SendMessage(camhandle,WM_CAP_DLG_VIDEOFORMAT,1,0);
end;

[Chrissi91]

Ja,

aber ich möchte das alles selber machen. Ich möchte eine Form selber machen mit den Einstellungen. (. Anhang)!

[MasterDG]

Hallo!

Also die Messages die du benutzten könntest stehen hier. Aber ich glaube nicht das du das ohne die Dialoge von Windows verändern kannst.

Eine Möglichkeit das zu verwirklichen wäre über die Komponente DSPack. Da kann man das glaub ich einstellen. Is übrigens super für Webcams.

EDIT: Satzbau verbessert...

Gruß
MasterDG