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中用拼音首字符序列来实现检索功能

Delphi数据库实现从最后一条记录向上查询至首记录

Delphi sysutils.trim、sysutils.trimleft、sysutils.trimright - 删除空格

Delphi xe5开发android程序调用电话相关功能(短信息和电话)

Delphi的tclientsocket组件和tserversocket组件(c/s)说明

Delphi 用空格把 s 凑够 n 的长度

自己写的app如何禁掉安卓锁屏

Delphi 循环 low high 用法

Delphi获取本机的ip地址

Delphi chart组件，chart控件用法

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

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