delphi android tstringlist addpair problem

Question

I use Delphi Rio to make an android app that reads contacts in the event AddressBookPermissionRequest and stores the name and the phone number of each contact as a name-valu