首页 > 代码库 > DPF.Android.Native.Components.v2.8.1 for delphi xe6 使用DPFJAlertDialog遇到的问题
DPF.Android.Native.Components.v2.8.1 for delphi xe6 使用DPFJAlertDialog遇到的问题
使用DPFJAlertDialog控件时发现DPFJAlertDialog1Click不能捕获到对话框到底按了那个按键,上网搜索后找到了解决方法:
打开DPF.Android.JAlertDialog.pas文件,找到procedure TAlertDialogOnClickListener.onClick( P1: JDialogInterface; P2: Integer )
然后按下面的方法修改就可以。
procedure TAlertDialogOnClickListener.onClick( P1: JDialogInterface; P2: Integer );
begin
FDPFJAlertDialog.FClickedIndex := P2;
FDPFJAlertDialog.FOnClick(FDPFJAlertDialog, P2, nil);//增加这行
P1.dismiss;
end;
另外,发现.DPFJAlertDialog1Click中的ButtonIndex不是从0开始,在android 4.42运行时发现第一个按键是-1,第二个按键是-2,其它版本android没有测试。
//**********************************************************
procedure TFProgressDialog.DPFJAlertDialog1Click(Sender: TObject;
ButtonIndex: Integer; TextResults: TArrayOfString);
begin
DPFJButton1.Text:=ButtonIndex.ToString;
end;
procedure TFProgressDialog.DPFJButton1Click( Sender: TObject );
begin
Timer1.Enabled := false;
CallInUIThreadAndWaitFinishing(
procedure
begin
DPFJAlertDialog1.ShowMessageDialog( ‘‘, ‘Progress Dialog Canceled!‘, [‘Yes‘,‘No‘] )
end );
end;