Video grabber component in Delphi can be used to capture picture/ photo the picture can be saved in to folder or database. This component has a lot of function and the function refer to camera access like video recorder, photo, video player etc. To make the Capturing picture /photo Delphi using video grabber component please follow a brief tutorial below:
Insert the component on the table bellow to the design form :
No | Component Name | Properties | Value |
1 | Button1 | Caption | Preview |
2 | Button2 | Caption | Capture Photo |
3 | Label1 | Caption | Select Camera |
4 | Combobox1 | - | - |
5 | Image1 | - | - |
6 | VideoGrabber1 | - | - |
Arrange the component like the picture bellow:
Capture Picture /Photo Delphi Using Video Grabber Component design Form
Then type this following source code
No | Component | Event | Source Code |
Form1 | OnCreate | videograbber1.Display_AutoSize:=false; combobox1.Items.add(videograbber1.VideoDevices); | |
Button1 | OnClick | videograbber1.StartPreview; | |
Button2 | OnClick | var Picture: TBitmap; begin Picture:=videograbber1.GetLastFrameAsTBitmap(0, false, 0, 0, 0, 0, image1.Width, image1.Height, 0); image1.Picture.Assign (Picture); end; |
Then run the CapturePicture /Photo Delphi Using Video Grabber by pressing run button
This is the picture of CapturePicture /Photo Delphi Using Video Grabber Application
Note:
The video grabber component that is used in this application is shareware version so that it could not work properly (maximal), in limited random time, application will stopped working, besides that application will appear overlay text nag screen the address of the website is www.datastead.com
I hope this writing can give benefit to the visitors, readers, developer and me. Thanks for visiting and availability for sharing this article by pressing
Share this on Facebook |