German Kontakte auswählen

[so27]

Hallo zusammmen,

ich hätte gerne die Möglichkeit in meiner App, dass der Benutzer das Telefonbuch aufrufen kann und sich einen Kontakt auswählt. Von dem ausgewählten Kontakt möchte ich dann die Daten (Anschrift und Rufnummer) in Textfields meiner App übernehmen.

Soweit das Vorhaben. In der Umsetzung tu ich mich recht schwer.

Wie kann ich es anstellen, dass ich über einen Button a.) das Adressbuch aufrufe und b.) ich einen Kontakt auswählen und die Daten übernehmen kann?

Kann mir hierbei bitte jemand behilflich sein :sign0085:

VG, so27

 

[Kiffi]

in der Phone-Lib befindet sich das Contacts-Objekt. Über dieses kannst Du mit
GetAll eine Liste befüllen, die Du dann durchlaufen kannst:

Dim CC As Contacts
Dim CL As List
CL = CC.GetAll
For i = 0 To CL.Size - 1
  Dim C As Contact
  C = CL.Get(i) 'fetch the Contact from the original list
  Log(C)
Next

Grüße ... Kiffi

 

[so27]

Alles klar, danke Kiffi. Jetzt habe ich nur das Problem, dass mir die Kontakte einzeln in Lists eingelesen werden. Wir kann ich denn hier die ID aus dem Listeintrag ID=xy auslesen?

Gruß, so27