Delphi recognizes the battery level of an Android device
You may want to know the battery level.
On Android, the battery manager broadcasts intent information about the battery.
To find out the battery level, get the battery level and battery level and calculate the percentage.
The code is based on the Android developer training article “Monitoring battery power and charging status“.
Sample code
Put buttons and list boxes on the form
Just press a button to detect power
Write the detected% value into the list box
Describe the process. (Confirmed through 10.2 Tokyo, Nexus 5 and 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,
FMX.Controls.Presentation, FMX.StdCtrls, FMX.Layouts, FMX.ListBox,
Androidapi.Helpers, Androidapi.JNI.GraphicsContentViewText,
Androidapi.JNI.JavaTypes
;
type
TForm1 = class(TForm)
ListBox1: TListBox;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{private declaration}
public
{public declaration}
end;
var
Form1: TForm1;
implementation
procedure TForm1.Button1Click(Sender: TObject);
var
ifl: JIntentFilter;
ctx: JContext;
bStatus: JIntent;
level, scale: Integer;
begin
//Determine the current state of charge (get battery state intent)
ifl := TJintentFilter.JavaClass.init(TJIntent.JavaClass.ACTION_BATTERY_CHANGED);
ctx := TAndroidHelper.Context;
bStatus := ctx.registerReceiver(nil, ifl);
//BatteryManager.EXTRA_LEVEL string//Realistic level // Realistic string scale of BatteryManager.EXTRA_SCALE
level := bStatus.getIntExtra(StringToJString(‘level’), -1);
scale := bStatus.getIntExtra(StringToJstring(‘scale’), -1);
ListBox1.Items.Add(‘Battery’);
//Calculated state of charge%
ListBox1.Items.Add(IntToStr((100*level) div scale));
end;
end.
