在用XE5创建了移动应用后,一般会在工程里添加System.Types, System.UITypes,FMX.Dialogs单元,这里面定义了MessageDlg函数用到的声明、枚举类型定义等。
正常情况下,在windows下使用MessageDlg函数其定义是:
function MessageDlg(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; HelpCtx: Longint): Integer;
具体使用方法是:
if MesageDlg('您要退出应用吗?',mtInformation,[mryes,mrno],0)=mbyes then
........
但在mobile(FMX架构)下的应用却不是这样,编译会报错。原来XE5开发移动应用(不知道开发winfors是不是也这样)在引用枚举类型时也要像引用类成员一样,加类标识符
if messagedlg('要退出吗',TMsgDlgType.mtWarning,[TMsgD*n.mbYes,TMsgD*n.mbNo],0)=mryes then
这样在XE5下的编译就能通过了
注:使用这个函数有个缺陷--即如果你在程序中点了手机的返回键(硬件),此时应用程序弹出对话框让你确认操作,但不小心来了电话或切换到其它程序中去了,这时你返回来的时候便会出现死机的情况(有人说这是EMB的一个设计错误,一个BUG),但如果在没有弹出这个对话框的时候进行切换则不会出现死机状况。至今还没有解决之道,希望有机会能解决这个难题。
另外,在应用程序中执行确认操作可以使用TPOPUP等方式来替代,经网友证实是安全可行的。