Delphi 开发安卓时判断进入非活动


本文整理自网络,侵删。

 
Java开发安卓时,会使用onResume及onPause处理APP的执行状态,而在使用delphi做安卓开发时,在主窗体的各事件中不能处理这对应的状态切换事件(至少目前我没找到)。

有时候,我们需要在APP暂时处于非活动状态及恢复激活时完成一些工作,为此,需要增加一个事件的响应处理。

引用 FMX.Platform

增加一个事件处理过程:

function AppEvent(AAppEvent: TApplicationEvent; AContext: TObject): Boolean;
1
其中的TApplicationEvent 是事件状态,他包括了FinishedLaunching, BecameActive, WillBecomeInactive, EnteredBackground, WillBecomeForeground, WillTerminate, LowMemory, TimeChange,对应事件状态为:完成启动,变为活动,将变为非活动,进入后台,将成为前台,将终止,低内存,时间更改。

我们需要在事件过程是判断AAppEvent的值,并编写对应的处理过程就好。

其次,需要在系统启动创建时,将事件过程指向AppEvent,从而激活事件的执行。

procedure TForm_Main.FormCreate(Sender: TObject);
var
  AppEventService: IFMXApplicationEventService;
begin
  // 增加一个窗体激活事件的响应
  if TPlatformServices.Current.SupportsPlatformService
    (IFMXApplicationEventService, AppEventService) then
    AppEventService.SetApplicationEventHandler(AppEvent);
End;

来源:https://blog.csdn.net/tanqth/article/details/109143554

相关阅读 >>

橙子作品 bds/cds 下的 web deploy 工具

Delphi 遍历文件单元文件

Delphi读写ini文件加锁(独占)

winapi 字符及字符串函数(5): ischaralpha - 是否是个字母

Delphi研究之驱动开发篇(七)--利用共享内存与用户模式

Delphi通过进程名获取进程pid函数

Delphi 拷贝文件时有进度显示

Delphi获得文件的版本号

Delphi dbgrideh 的分组统计 datagrouping

Delphi 通过窗口特定标题锁定窗口

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...