Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Take Pictures, photos with Microsoft Life Cam
Message
From
18/10/2011 12:30:24
 
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
01526778
Message ID:
01526781
Views:
72
See Message ID: 1462493


>Hello to all :
>
>Iam using the following code to take Photos and Pictures. Works fine with Windows 7 64 BITS and VFP 9.0 SP2 and Microsoft Life WebCam. but the size of picture file is 320,240, I need save to a diferent size (192,233)
>
>* Variable to set a number to Windows Capture Form
>DECLARE Integer GetFocus IN user32
>vp_hWindows=GetFocus()
>
>* - Create Windows to show the Image
>DECLARE INTEGER capCreateCaptureWindow IN avicap32;
>STRING lpszWindowName, LONG dwStyle,;
>INTEGER x, INTEGER y,;
>INTEGER nWidth, INTEGER nHeight,;
>INTEGER hParent, INTEGER nID
>
>vp_hCapture = capCreateCaptureWindow("",;
>0x40000000+0x10000000,;
>10,8,192,223, vp_hWindows, 1) && 192,223 is the size of windows capture
>
>* Driver Connect
>thisform.msg(0X0400+10, 0,0)
>
>*- Activate the Microsoft Life Cam
>THISform.msg(0x0400+52, 30,0)
>THISform.msg(0x400+50, 1,0)
>
>IF vp_capOverlay != 0
> THISform.msg(0x400+51, 1,0)
>ENDIF
>
>* --- take pciture and save to file / Tomar la foto y guardarla en archivo
>* --- this code is in button to take the Picture and save to File
>*THISFORM.msg(0x+60, 0,0)
>THISFORM.msg(0x400+25, 0, "c:\PhotoSample.JPG",1) && My Image File Saved (photo) is 320,240,and need a diferent size
>
>* The code works fine, but the size of picture file is 320,240, I need save to a diferent size (192,233)
>
>Can anybody helpme to set the result of the size to (192,233) of File.JPG ?
>
>
>Thanks a lot,
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform