Taking photos

There are many occasions when it is useful to be able to take a photo from an app. The programming model is very easy, but it is not the TCamera component that you need to use. In FireMonkey, taking photos is achieved by executing a special take photo from camera action. The following steps take you through building a demo based on that action:

1. Create a new blank multi-device FireMonkey application. Save the main form’s unit as uFormCam and the project as CamApp, and change the Name property of the form to FormCam.
2. Change the Style setting in the combobox above the form to iOS or Android.
3. Drop a TImage component on the form, rename it to ImagePhoto, and align it to Client.
4. Add a TToolBar component and drop a TSpeedbutton onto the ToolBar1 control. Change its Name to SpdbtnTakePhoto and the button’s Stylelookup property to cameratoolbutton, align it to Left, and adjust the width so it becomes a square.
5. Drop a TActionList component...