kangboy

android10，delphi12.1 procedure TFMain.FillContactList(Source: TAddressBookSource); var I: Integer; Contacts: TAddressBookContacts; begin Contacts := TAddressBookContacts.Create; try AddressBook1.AllContacts(Source, Contacts); ListViewContacts.BeginUpdate; try ListViewContacts.Items.Clear; for I := 0 to Contacts.Count - 1 do AddListViewItem(Contacts.Items[I]); finally ListViewContacts.EndUpdate; end; finally Contacts.Free; end; end; All permissions have also been added, Get_accounts、Read_contacts、Write_contacts, why?

I am using version 12.1 of Delphi, android 10，and the code is as follows: procedure TForm1.BiometricAuth1AuthenticateFail(Sender: TObject; const FailReason: TBiometricFailReason; const ResultMessage: string); begin Label1.Text:='fail' end; procedure TForm1.BiometricAuth1AuthenticateSuccess(Sender: TObject); begin Label1.Text:='OK' end; procedure TForm1.Button1Click(Sender: TObject); begin BiometricAuth1.Authenticate; end; but，After using the correct fingerprint, the program will not return to the successful verification process and will exit directly. Debugging with breakpoints cannot be traced because the program exits directly at this point，please help，thanks。