Italian strano comportamento della rubrica del telefono

fifiddu70

Well-Known Member
Licensed User
Longtime User
mi sapete dire perchè quando chiamo dal mio programma la rubrica, alcuni nomi li visualizzo ed alcuni no?
altro problema, quando seleziono qualche nome dalla rubrica, alcuni li vedo bene e si collocano rispettivamente nella txtnumber per il numero e nella
lblname per il nome, altri contatti che seleziono dalla rubrica invece non visualizzo nessun numero su txtxnumber.text e invece dove dovrei visualizzare il nome sulla lblname.text visualizzo una sorta di scritte tipo: genius-hmmh0af2k87@ceckout.google.com
sapete dirmi perchè?
posto il pezzo di codice riguardante la rubrica.
B4X:
Sub btnContacts_Click
    
    Dim PhoneContacts As Contacts
    Dim ContactsList, ListOfNames As List
    ContactsList = PhoneContacts.GetAll
    ListOfNames.Initialize
    For i = 0 To ContactsList.Size - 1
        c = ContactsList.Get(i)
        If c.DisplayName.IndexOf("@") = -1 Then 
            ListOfNames.Add(c.DisplayName)
        End If
    Next
    Dim EmergencyContacts As List
    EmergencyContacts=InputMultiList(ListOfNames,"Contacts")

    If EmergencyContacts.Size>0 Then
        c = ContactsList.Get(EmergencyContacts.Get(0))

        txtNumber.Text=c.PhoneNumber
      lblname.Text = c.DisplayName
    End If
   txtTesto.Text = ""
End Sub
 

giannimaione

Well-Known Member
Licensed User
Longtime User
ciao Filippo (fifiddu),
vedi se questo esempio ti può essere d'aiuto
B4X:
Dim nElementi As Int
   Dim z As Int
   Dim Nome As String
   Dim Ntel As String
   Dim Lista As List
   Dim Contatti As Contacts2
   Dim contatto As Contact
   Dim mappa As Map
   
   
   Lista=Contatti.GetAll (True,False)

   nElementi=Lista.Size
   For i=0 To nElementi-1
      contatto=Lista.get(i)
      Nome=contatto.Name
      mappa=contatto.GetPhones
      
      If Nome.IndexOf("@") = -1 Then
         z=mappa.Size
         If z>0 Then
            Ntel=mappa.GetKeyAt(0)
            Log(Nome)
            Log(Ntel)
            End If
      End If
   Next
 
Last edited:

lock255

Well-Known Member
Licensed User
Longtime User
Ciao @fifiddu70 so chè hai aperto questo thread molto tempo fa, ma ho il tuo stesso identico problema.
Per caso poi sei riuscito a risolvere?
 

lock255

Well-Known Member
Licensed User
Longtime User
No, da una prima occhiata sembra completa... ma la testo domani con calma :)
 
Top