FMX.FlashLight Sample

From RAD Studio Code Examples
Jump to: navigation, search

This is a sample that uses FireMonkey to make your device function as a flashlight.


You can find the FireMonkeyMobile FlashLight sample project at:

  • Start | Programs | Embarcadero RAD Studio Rio | Samples and navigate to:
    • Object Pascal\Multi-Device Samples\Device Sensors and Services\FlashLight
    • CPP\Multi-Device Samples\Device Sensors and Services\FlashLight
  • Subversion Repository:
    • You can find Delphi and C++ code samples in GitHub Repositories. Search by name into the samples repositories according to your RAD Studio version.


This application shows the use of the TCameraComponent to toggle a device flash.

Note: This application only has effect on an actual mobile device.

How to Use the Sample

  1. Navigate to the one of the locations given above, and open:
    • Delphi: FlashLight.dproj
    • C++: FlashLight.cbproj
  2. Press F9 or choose Run > Run.


The project has one source file, FlashLightU.pas, which contains the main form class.


TFlashLightForm represents the main form of the application. It contains the following components:


  • The main form contains two TImage objects: ImageOff and ImageOn that are shown or hidden depending on whether the flash is active.
  • The flashlight and the light on the screen are also two TImage objects on which two effects are applied: TGlowEffect and TShadowEffect.


See Also