Delphi changes Android brightness
When the screen turns black, it is usually impossible to read the application that reads the barcode displayed on the terminal.
In this case, a method of increasing the brightness of the application side device is performed.
Use WindowManager.Layoutparams to control the brightness in Delphi.
Sample code
Place a button on the form
Press the button to maximize brightness.
Press again to minimize brightness.
Describe the process. (Confirmed with Nexus 5 (Android 5.1.1))
unit Unit1;
interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
Androidapi.JNI.GraphicsContentViewText, FMX.Controls.Presentation,
FMX.StdCtrls, Androidapi.Helpers, Androidapi.Jni, Androidapi.JNI.App
;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
procedure FormShow(Sender: TObject);
private
{private declaration}
jp: JWindowManager_LayoutParams; // WindowManager.LayoutParams
sw: Boolean; // Simply switch
public
{public declaration}
end;
var
Form1: TForm1;
implementation
{$R *.fmx}
procedure TForm1.Button1Click(Sender: TObject);
begin
if sw then begin
//Minimize brightness
jp.screenBrightness := TJWindowManager_LayoutParams.JavaClass.BRIGHTNESS_OVERRIDE_OFF;
sw := False;
end else begin
//Maximum brightness
jp.screenBrightness := TJWindowManager_LayoutParams.JavaClass.BRIGHTNESS_OVERRIDE_FULL;
sw := True;
end;
//Set reflection brightness
TAndroidHelper.Activity.getWindow.setAttributes(jp);
end;
procedure TForm1.FormShow(Sender: TObject);
begin
jp := TAndroidHelper.Activity.getWindow.getAttributes; // Get the current brightness status
sw :=True; //Initialization switch
end;
end.
