本文整理自网络,侵删。
uses iOSapi.UIKit;
procedre SetSleep(Enable:Boolean); var UIApp : UIApplication; begin UIApp := TUIApplication.Wrap(TUIApplication.OCClass.sharedApplication); UIApp.setIdleTimerDisabled(Enable); //Change it to false on app close end;
相关阅读 >>
Delphi ioutils tdirectory获取一个目录下所有文件名,包括子目录
Delphi 文件/流的加密解密单元 unit_compress.pas
更多相关阅读请进入《Delphi》频道 >>