مشروع تجاري مضاد سرقة الجهاز افكار وسورس

[onexite]

مارئيكم في لوحة التحكم القديمة ام هذه افضل ؟


استخدام المكون
سطح المكتب

PHP كود :

var Bitmap:TBitmap;
begin
Bitmap:=TBitmap.Create;
try
CamHelper1.StartCam(0);
CamHelper1.GetImage(Bitmap) ;
img1.Picture.Assign(Bitmap);
finally
Bitmap.Free;
end; 


الكام

PHP كود :

var Bitmap:TBitmap;
begin
Bitmap:=TBitmap.Create;
try
CamHelper1.GetCams;
if CamHelper1.CamCount>0 then begin
CamHelper1.StartCam(1);
CamHelper1.GetImage(Bitmap) ;
img1.Picture.Assign(Bitmap);
end;
finally
Bitmap.Free;
end;