SiemensMania.cz

Orginal source can u find here
http://papuas.allsiemens.com/

here a fast Demo App

http://rapidshare.com/files/14694569/Webcam.exe.html

Can u write in English ?
if u had wishes or u have found Bugs then report it Please

i need support for pu i have not all devices to test

procedure TFormMain.ButtonGetCamClick(Sender: TObject);
var
i,x : integer;
addr,size : dword;
begin
if FixPage<>-1 then begin
FormCamera.Off := True;
...