Delphi中禁用和取消Android应用睡眠

本文整理自网络，侵删。

 
您可以使用Android API禁用或取消Android应用程序的睡眠状态。

以下代码是一个示例，该示例在Delphi 10 Seattle中禁用和取消Android应用程序的睡眠状态。

uses
  Androidapi.Helpers,
  Androidapi.JNI.GraphicsContentViewText,
  FMX.Helpers.Android;

procedure TForm2.Button1Click(Sender: TObject);
begin
  FMX.Helpers.Android.CallInUIThread(
    procedure
    begin
      // 禁止入休眠状态
      TAndroidHelper.Activity.getWindow.addFlags
        (TJWindowManager_LayoutParams.JavaClass.FLAG_KEEP_SCREEN_ON);
    end);
end;

procedure TForm2.Button2Click(Sender: TObject);
begin
  FMX.Helpers.Android.CallInUIThread(
    procedure
    begin
       // 允许入休眠状态
      TAndroidHelper.Activity.getWindow.clearFlags
        (TJWindowManager_LayoutParams.JavaClass.FLAG_KEEP_SCREEN_ON);
    end);
end;
 

相关阅读 >>

Delphi fdconnection1 获取数据库总记录数

Delphi 使用钩子函数 - 钩子链和 callnexthookex 的返回值

Delphi无dll穿墙下载者

Delphi编程时按回车键无效，无法换行解决办法

Delphi获取系统进程和路径

Delphi idhttp post中文的问题

Delphi中messagebox用法

Delphi gmt时间与tdatetime转换

Delphi中coinitialize作用

Delphi findwindow的一些用法

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi中禁用和取消Android应用睡眠